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Niets uit deze uitgave mag worden verveelvoudigd en/of 
openbaar gemaakt door middel van druk, fotokopie, microfilm, 
geluidsband, elektronisch of op welke andere wijze ook en 
evenmin in een retrieval system worden opgeslagen zonder 
voorafgaande schriftelijke toestemming van de uitgever. 


VOORWOORD 


Er zijn mensen die menen dat je niet over Logo moet schrijven, laat 
staan dat je erover moet lezen. 'Logo moet je ervaren! is het motto. 
Met dat laatste ben ik het van harte eens. Wellicht kan dit boek u 
helpen om Logo te ervaren. 

Logo, de programmeertaal, is tegelijk een visie op onderwijs. 
Ik denk dat het programmeren in Logo voor veel mensen een open- 
baring kan zijn. 

Zoals u weet zijn computers in feite slechts domme! apparaten. 
Uit zichzelf zal de computer niets ondernemen. Om de computer te 
vertellen wat hij doen moet hebben we een taal nodig, een taal om 
met de computer te communiceren. En eigenlijk verstaat de computer 
maar één taal: de taal van zijn 'hart', de CVE (Centrale Verwer-. 
kings Eenheid). 

Deze 'moedertaal' van de computer bestaat slechts uit ёпеп en 
nullen. Het zou bijzonder onplezierig zijn wanneer we slechts 70! 
met de computer konden communiceren. We zouden het spoor snel 
bijster raken. Om iets aan dit probleem te doen zijn er vele 'hogere! 
programmeertalen ontwikkeld. Door de computer echter wordt iedere 
opdracht vanuit een ‘hogere! taal ogenblikkelijk weer veranderd іп 
een serie ёпеп en nullen. 

Er zijn zeer vele Тореге! programmeertalen: Ada, BASIC, 
Pascal, PROLOG, LISP, COBOL, ALGOL, APL, Pilot, С, Smalltalk, 
Forth, FORTRAN, Action, en dus ook Logo. 

Dit lijstje van computertalen is niet compleet, en bovendien 
bestaan ег van iedere taal nog vele dialecten. Microsoft BASIC 15 
anders dan Extended BASIC en ook BBC BASIC is anders dan 
Commodore BASIC. Ziet u door de bomen het bos niet meer? Ach, 
het valt met Logo allemaal wel mee, die verschillen. Natuurlijk zijn 
ze er wel, maar ze zijn aanmerkelijk kleiner dan bij BASIC bijvoor- 
beeld. Zelf heb ik met verschillende Logo-versies gewerkt. 

De procedures in dit boek zijn geschreven in LCSI Logo (voor 
Atari), maar ze kunnen geschikt worden gemaakt voor iedere Logo. 
Daarvoor vindt u achterin dit boek een vergelijkingstabel waarin de 
meestgebruikte Logo-woorden van de meestgebruikte Logo-versies 
staan. Het gaat om de Logo-versies voor de volgende merken com- 
puters: Atari 8-bits en 16-bits, Apple, BBC/Acorn, Commodore, 
MSX en Spectrum. U zult zien dat de diverse Logo's weinig van 
elkaar verschillen, al hebben ze elk hun eigen mogelijkheden. 
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Еп dan over dit boek. ІК heb geenszins de pretentie volledig 
te zijn. Dat kan ook niet, omdat ik van mening ben dat Logo op zijn 
‘waardevolst! і in de hand van zijn gebruiker(ster). ІК kom hier 
later op terug. De bedoeling van dit boek is een inleiding, een weg- 
wijzer, te zijn in het gebruik van de taal Logo. Logisch Logo wil 
u bouwstenen aanreiken waarmee u uw eigen Logo-wereld bouwt. 

Ik raad u aan bij het lezen geen hoofdstukken over te slaan. 
Vaak worden er begrippen, opdrachten en/of procedures gebruikt 
die eerder zijn uitgelegd. 

Het is belangrijk (en leuk!) om via de programma's en procedu- 
res in dit boek greep te krijgen op Logo, om zo, in eigen omgeving, 
op geheel eigen wijze inspiratie te putten uit en bevrediging te vin- 
den in het werken met Logo. 

Dat Logo een uitstekend middel is om analytisch en probleem- 
oplossend te leren denken moet toch reden genoeg zijn om er zo snel 
mogelijk mee te willen beginnen. Moge dit boek daaraan een beschei- 
den bijdrage leveren. 


VERANTWOORDING 


Het was de bedoeling een zo oorspronkelijk mogelijk boek over de 
programmeertaal Logo te schrijven. Er is echter niet aan te ontko- 
men om voor ideeën, programmeervaardigheden en hulpprocedures 
te putten uit andere, veelal Amerikaanse, Logo-bronnen. Het een 
en ander is echter steeds naar eigen inzicht bewerkt, veranderd en 
aangepast. Bepaalde gedeelten uit het boek, waaronder enkele pro- 
cedures, zijn door mij reeds eerder in verschillende bladen gepu- 
bliceerd. 

De illustraties, alle origineel en speciaal voor deze uitgave 
gemaakt, zijn van André de Regt. Als basis voor de illustraties is 
steeds gekozen voor de Turtle. De Turtle is immers het herkenbare, 
zeg maar het handelsmerk, van Logo. Als zodanig verschijnt de 
Turtle ook in de Logo Taal- en Muziekwereld, twee Logo-werelden 
die niets met de Turtle van doen hebben. 

De 'Turtle Graphics! illustraties zijn met toestemming overgeno- 
men uit de werkboekjes van het Logo Centrum Ede. 

Een enkele opmerking nog over de afgedrukte tekst van Logo- 
procedures: 

- druktechnisch bleek het niet mogelijk de lange procedureregels 
achter elkaar ор één regel af te drukken. Dergelijke Чапре! 
regels zijn daarom gesplitst. Bijvoorbeeld: 


LE ¿PUT FIRS- PIRSSI a DRAIG. ГОР. LAST FIRST: :D 
КААІОМЈ COP VERGELIJK :INPUT ВЕ :DRAAIOMJ 


Hoewel deze procedureregel op twee regels is afgedrukt, is het 
toch één procedureregel. Pas na het intikken van deze gehele 
regel mag de RETURN-toets ingedrukt worden. 
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- Onthoud: 
ledere procedureregel begint met een opdracht (of met het aan- 
roepen van een subprocedure). 
Iedere procedureregel wordt afgesloten door een druk op де 
RETURN-toets. 


Als u dit in acht neemt zullen alle voorbeeldprocedures (eventueel 
aangepast aan uw eigen Logo-versie) moeten draaien. 


Rinsumageest Auke Sikma 
juni 1986 


INHOUD 


HOOFDSTUK 1 - WELKOM BIJ LOGO 


1.1 Wat is Logo ..., een inleiding 

1.2 De wortels van Logo: kunstmatige intelligentie (AI) en 
Jean Piaget 

1.3 Wat maakt Logo zo speciaal? 

1.4 De vier Logo-werelden 


HOOFDSTUK 2 - DE LOGO SCHILDPADWERELD 


2.1 De schildpadwereld, een inleiding 
2.2 Procedures maken 

2.3 Variabelen 

2.4 Recursie 

2.5 Logo pen- en kleuropdrachten 
2.6 Het werken met meerdere Turtles 


HOOFDSTUK 3 - DE LOGO TAALWERELD 


Inleiding 

Het manipuleren met woorden en lijsten 

Het maken van testopdrachten en de te gebruiken Logo- 
functies 

4 De Haiku.Generator | 

5 Invoeropdrachten met Read Character en Read List 

.6 De tegenstelling 
7 

8 


3 
3. 
3 


сә N н 


De Logo-psychiater 

Logo en databases 

LOGOMEMO 

„10 Logo-Manager; stap voor stap uw eigen database maken 
.11 Het maken van adventures (avonturenspelletjes) 

‚12 Het gebruik van lijsten 

‚13 Logo-tekst, de bouwstenen voor een tekstverwerker 
‚14 Enige nuttige Taal-procedures 


w w бо OP CO OP OP Ga ÇO Gi Kai 
de, 


HOOFDSTUK 4 - LOGO: CIJFERS EN GETALLEN 


4,1 Inleiding 
4.2 Wiskundige functies 
4.3 Talstelsels 


4.4 Hexadecimale getallen (het zestientallig stelsel) 


HOOFDSTUK 5 - DE WONDERE WERELD VAN LOGO-MUZIEK 


Inleiding 

Wat is geluid? 

Muziek maken met Logo 

Meerstemmige muziek met Logo 

Het klankverloop beheersen met de 'Envelope Shaper' 
Tot besluit: Turtle Music 


сл сл сл сл «л сл 
DEN н 


HOOFDSTUK 6 - DE WERELD VAN DE LOGO-SPROKEN 


Sproken, wat zijn dat? 

Het maken en ontwerpen van sproken 
Een sproken-bibliotheek 

Animatie met sproken 

Over ‘Collision! en 'When-Demons' 
Een voorbeeldspel: Super Shuttle 
Sproken voor gevorderden 

Het maken van meerkleurige sproken 
Nuttige hulpprogramma's 


OO OO O> O> OH O>; CO: 
со ooN O> OS Ga м = 


HOOFDSTUK 7 - LOGO MET KINDEREN 


Inleiding 

Een praktijkverslag 

NederLogo 2.7 - De complete lijst 
Onderwijsprogramma's met Logo 
Logo in de klas 

Afsluiting 


“ааа ette 
Су сл > со м н 


HOOFDSTUK 8 - LOGO i.: EEN TAAL; VELE DIALECTEN 


8.1 Bespreking van de meestgebruikte Logo's 
8.2 Vergelijkingstabel 


APPENDICES 


А.1 Lijst van de meestgebruikte Logo-primitieven 
De Logo-foutmeldingen 

Logo en machinetaal 

ASCII-codetabel 

Namen, adressen en tips 


КӘ? 
сл ны Go о 


EPILOOG 


LITERATUUR 


INDEX 


Hoofdstuk 1 - WELKOM BĲ LOGO 


AW - 
уп! / б hon 


я 4, ef, / | 7! d f ! 
Т, Gu RARA! Lë 7 RR ұнамас. 


11 Wat is Logo..., een inleiding 


De programmeertaal Logo werd aan het eind van de zestiger jaren 
ontwikkeld op het 'Massachusetts Institute of Technology! in Ameri- 
ka. Een van de mensen die zeer nauw bij het onderzoek betrokken 
waren was Seymour Papert. Deze Seymour Papert wordt door velen 
dan ook gezien als de geestelijke vader van Logo. Een journalist 
heeft Papert eens de Spiritual father of the Logo-Movement genoemd. 

U kunt echter gerust zijn: Logo is geen geloof en ook geen sek- 
te. Geen geestelijke stroming, of een manier van denken. Door met 
Logo te werken leert u echter wel op een andere manier denken. Met 
Logo als ‘instrument', als 'gereedschap' leert u analytisch en 'pro- 
bleemoplossend' denken. Later wordt hier uitgebreid op ingegaan. 

Seymour Papert omschrijft Logo aldus: "А versatile computer 
language that provides a friendly introduction to programming, a 
serious tool for advanced programmers and a medium for educational 
discovery." Dit citaat komt uit een interview met Seymour Papert dat 
heeft gestaan in het blad Atari Connection, herfst 1983. 

Paperts boek Mindstorms, children, computers and powerful 
ideas beschrijft de filosofie achter Logo. In het Nederlands is dit 
boek verkrijgbaar onder de titel Computers en kinderen (uitgave 
Bert Bakker, Amsterdam). In Mindstorms beschrijft Papert de ont- 
wikkeling van Logo, en welke ideeën aan de taal ten grondslag lig- 
gen. 

Aanvankelijk is Logo ontwikkeld met het oog op kinderen. Logo 
moest een taal worden zonder drempel, zeer gebruikersvriendelijk. 
In de eerste Logo-versies werd de nadruk gelegd op het gebruik 
van woorden en lijsten. Het is dan ook niet zo verwonderlijk dat 
Logo een nauwe verwantschap heeft met een professionele taal als 
LISP (LISt Processing). 

Om Logo echter voor een groot publiek gebruikersvriendelijk en 
toegankelijk te maken werd de Turtle (Schildpad) geïntroduceerd. 
De Turtle is een bewegende en tekenende 'vloerrobot!' of een figuur 
op het beeldscherm. In sommige Logo-versies echter is deze Turtle 
reeds verworden tot een simpel driehoekje. 

Het maken van tekeningen met de Turtle wordt Turtle Graphics 
genoemd. Hoewel aanvankelijk bedacht als opstapje tot het 'Logo- 
programmeren! zijn met de Turtle Graphics toch zeer geavanceerde 
afbeeldingen te maken. Papert zelf noemt zijn Turtle Graphies een 
aanzet tot 'proces-georiënteerde en dynamische wiskunde'. 


Logo komt voort uit het onderzoek in kunstmatige intelligentie ener- 
zijds en de leertheorieën van Jean Piaget anderzijds. Er is over bei- 
de zaken reeds veel geschreven en het is niet nodig er in dit boek 
diep op in te gaan. Toch lijkt het zinvol dit onderwerp kort te 
bespreken. 


1.2 De wortels van Logo: kunstmatige intelligentie (Al) en 
Jean Piaget 
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Een 'zelf-denkende' computer, die concludeert, constateert en rea- 
geert, die gewoon met de stem, dus zonder specifieke 'computerta- 
len', aangesproken kan worden, en die ons adviseert en helpt bij 
het nemen van beslissingen. Is dit fantasie? Science fiction wellicht? 
Nee, het is het dagelijkse streven van de vele onderzoekers op het 
gebied van kunstmatige intelligentie (artificial intelligence). 

Kunstmatige intelligentie is een tak van computerwetenschap die 
zich bezighoudt met de ‘begrippen en methodieken voor het maken 
van gevolgtrekkingen door een computer", Deze wetenschap spitst 
zich dus toe op de zogenaamde ‘denkende! machines. Een en ander 
wordt aangeduid met de term: vijfde-generatie computers of KIPS 
(Knowledge Information Processing Systems). 

Wellicht is de term 'vijfde-generatie! u onbekend. Hiermee wordt 
bedoeld dat deze generatie computers niet slechts in staat is tot ver- 
werking van gegevens, maar tevens tot beredeneerde manipulatie 
van gegevens. De vier eerdere generaties computers zijn: 


> 


computers op grond van elektrische vacuümbuizen; 
getransistoriseerde computers; 

computers met geïntegreerde schakelingen (IC's); 
computers met VLSI (Very Large Scale Integration). 
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Vier generaties lang was het enige wat computers bezaten: 
informatie. Maar ‘informatie bezitten! is niet hetzelfde als intelligen- 
tie. Dat zien we overigens niet alleen bij machines. 

Intelligentie komt van het Latijnse woord "ереге! (wat o.a. kie- 
zen betekent). Еп, zo reageerden de onderzoekers, om intelligentie 
te creëren hebben we niet voldoende aan kennis en informatie alleen. 
Iedere computer kan informatie opnemen, maar is daarmee nog niet 
intelligent. Intelligentie is onder meer het manipuleren van informa- 
tie. Ter illustratie het volgende voorbeeld. 

Stel u wilt, enthousiast gemaakt door dit boek, nog meer weten 
over Logo en u besluit om hierover nog een boek aan te schaffen. 
Op grond van kennis en informatie zult u dan niet naar een platen- 
winkel of doe-het-zelf-zaak gaan. Op grond van ervaring (empirisch 
denken) en logisch denken (heuristiek) zult u naar een boekwinkel 
gaan, waarvan u aanneemt dat ze het boek in voorraad hebben; en 
u zult wellicht meteen bij de informaticaboeken kijken en zo nodig 
vragen het boek voor u te bestellen. 

Op grond van informatie en kennis had u het boek niet of nau- 
welijks kunnen kopen. Op grond van de door u beheerste kennis, 
alsmede het vermogen deze kennis door middel van empirisch denken 
en heuristiek te manipuleren kunt u intelligent genoemd worden. 

Maar ... hoe zit het dan met machines? Is het mogelijk denkende 
en intelligente machines te ontwerpen? Veel mensen schrikt deze 
vraag af, en tegelijkertijd is dat niet zo verwonderlijk. 

Op de voorplaat van de Haagse Post van 22 maart 1986 staat een 
illustratie die treffend de angst van mensen voor ‘denkende machi- 
nes! laat zien. De tekening, уап de Amerikaan Keith Haring, laat 
ons een woedende massa zien гопа een "АепКепде! computer. Dat de 
computer denkt zien we door de op het beeldscherm afgebeelde her- 
senen. De computer wordt boven de massa uitgetild door een, in 
contrasterende kleuren getekende, figuur. Beeldt deze figuur wel- 
licht de elite uit die zich met deze wetenschap bezighoudt? Wie weet 
... Maar het is wél duidelijk dat deze tekening de gedachten van 
velen over kunstmatige intelligentie op voortreffelijke wijze illus- 
LOUT ES, 

Waarom die angst? We hebben, in meerdere of mindere mate, 
reeds geaccepteerd dat machines ons fysiek overtreffen. Of het nu 
gaat om kanalen graven, bomen omzagen, betonpalen verplaatsen of 
cement maken, steeds weer blijkt dat machines in staat zijn deze 
werkzaamheden sneller, nauwkeuriger en dus 'beter! te doen dan wij 
zelf ooit zouden kunnen. Maar of wij nu machines kunnen maken die 
ons ook verstandelijk overtreffen ...? Op verstandelijk gebied zijn 
wij de machines namelijk nog steeds de baas. 

Een computer is volledig afhankelijk van de gegevens die wij hem 
verstrekken. Hoewel het onderzoek naar kunstmatige intelligentie 


nog verschillende problemen te overwinnen heeft, wordt er nu reeds 
geëxperimenteerd met ‘denkende тасһіпеѕ'. 

Wellicht zegt de term 'expertsysteem! u iets. Een expertsysteem 
is een computerprogramma dat bijvoorbeeld gebruikt kan worden bij 
het stellen van een medische diagnose. De computer zal dan op basis 
van het expertsysteem naast het combineren van theoretische kennis 
ook ‘empirisch! gericht zijn. Dat wil zeggen dat de computer als het 
ware 'leert' van de ervaring. Indien bij bepaalde symptomen in 60% 
van de keren diagnose X wordt gesteld, zal de computer dit gegeven 
gebruiken bij het stellen van een volgende diagnose op grond van 
dezelfde symptomen. Aldus benadert de computer enigszins de des- 
kundigheid van de expert, de arts of specialist. 

De computer mist echter nog steeds de logica (heuristisch den- 
ken) om tot een bevredigende oplossing te komen. Zo zou de compu- 
ter op grond van de beschikbare informatie een volstrekt onlogisch 
antwoord kunnen geven. 


Welnu, de computertalen in de kunstmatige intelligentie zijn Prolog 
еп LISP. Logo is een directe afleiding уап LISP. 

Seymour Papert is, hoewel het meeste onderzoek in Japan 
gebeurt, lange tijd betrokken geweest bij het onderzoek aan het 
Artificial Intelligence Laboratory in Massachusetts. Vanuit dit onder- 
zoek en geïnspireerd door het denken over de psychologie van Jean 
Piaget ontstond aan het eind van de zestiger jaren de programmeer- 
taal Logo. 

Laten we maar eens kijken welke ideeën van Jean Piaget Seymour 
Papert inspireerden. Enkele uitspraken van Papert die zijn visie op 
het onderwijs weergeven: 


e Het huidige schoolsysteem geeft de leerkrachten weinig gelegen- 
heid om de kinderen werkelijk iets te leren. In plaats daarvan 
moeten zij de kinderen volstoppen met achterhaalde kennis, onnut- 
tige feiten en dogmatische ideologieën. 


e Scholen zullen een leeromgeving moeten ontwikkelen waarbinnen 
kinderen geen kennis opgedrongen wordt, maar waar hun, al 
doende, kennis en informatie aangeboden wordt. Voor het ontwik- 
kelen van zo'n leeromgeving zijn, in een technologische maat- 
schappij als de onze, computers onontbeerlijk. 


e Passen de scholen zich niet aan deze veranderde kijk op het leren 
aan, dan is hun lot bezegeld: ze zullen net als dinosaurussen ver- 
dwijnen. 


e De ontwikkeling van kinderen gaat nauw samen met het omgaan 
met nieuwe situaties. Daarom zal het kind pas werkelijk iets leren 
wanneer het zelf met nieuwe situaties omgaat en ze niet slechts 
observeert. Om dergelijke nieuwe situaties te creëren zullen we 
binnen het onderwijs zogenaamde "ееготреуіпреп! moeten schep- 
pen. 


ө Binnen een 'leeromgeving!' beinvloedt het kind zijn omgeving еп 
het wordt er zelf door beinvloed. 
Binnen een 'leeromgeving' wordt een kind niet gestraft voor origi- 
neel en non-conformistisch denken maar wordt dit juist gestimu- 
leerd. 
Binnen een 'leeromgeving' is het het kind dat manipuleert en niet 
de omgeving. 


Seymour Papert geeft toe sterk te zijn beinvloed door de ideeën 
van de Zwitserse psycholoog Jean Piaget. Regelmatig spreekt Papert 
over het zogenaamde 'Piagetiaanse leren’. Onder het 'Piagetiaanse 
leren’ wordt dan verstaan: het natuurlijke en spontane leren van 
mensen in wisselwerking met hun omgeving. 

Vaak wordt dit Ieren geplaatst tegenover het traditionele leren 
volgens een bepaald leerplan (wat kenmerkend is voor het huidige 
onderwijssysteem). Het is dan ook niet verwonderlijk dat Papert 
zich herhaaldelijk afzet tegen het traditionele schoolsysteem. 

In nauwe relatie met de leertheorieën van Piaget creëerde 
Papert binnen Logo de zogenaamde leeromgevingen. Papert zelf 
noemt deze leeromgevingen: 'Mierowerelden: Broedmachines voor 
Кеппіѕ'. Zonder van dit boek een psychologisch werk te willen 
maken nog een enkele toelichting op het begrip 'leeromgeving'. 

Het opdoen van kennis binnen een 'leeromgeving' wordt door 
Papert nauw verbonden met het proces dat in Piagets psychologie 
‘assimilatie! wordt genoemd. Ter verduidelijking moge het volgende 
dienen. Als iemand iets nieuws tegenkomt, een nieuwe ervaring op- 
doet, zal dit met de reeds aanwezige kennis in verband worden 
gebracht na te zijn waargenomen. De aldus verkregen nieuwe kennis 
zal vervolgens gehanteerd worden om met volgende situaties om te 
gaan. Met andere woorden: het nieuwe verwerken in het oude om 
vervolgens met het nieuwste te gaan werken. 

Dit proces dat, omdat het nieuwe vaak tegenstrijdig is met het 
oude, soms conflictsituaties oplevert wordt assimilatie genoemd. En 
deze assimilatie, dit proces van opdoen van nieuwe kennis om ver- 
volgens zelf hiermee te manipuleren, is de diepere gedachte achter 
Paperts 'leeromgeving'. 


1.3 Wat maakt Logo zo speciaal? 


Om dit te illustreren beginnen we meteen maar met het bekijken van 
twee korte Logo-programmaatjes. Later worden deze en andere pro- 
gramma's in aparte hoofdstukken nader besproken. 


EDIT “FIGUUR :ZIJDE :HOEK : VERGROTING 

FORWARD : ZIJDE 

RIGHT :НОЕК 

FIGUUR :ZIJDE + :VERGROTING :НОЕК :VERGROTING 
END 


Het resultaat van dit programma (met de drie variabelen :ZIJDE, 
:HOEK en :VERGROTING) is een figuur die steeds groter en groter 
wordt. Aan het eind van de procedure treedt een herhaling (recur- 
sie) in werking omdat de procedure als het ware zichzelf opnieuw 
aanroept (later hierover meer). 


EDIT “PRAATJE 

PRINT CHOE IS HET WEER VANDAAG ?3 

MAKE "ANTWOORD READLIST 

IF :ANTWOORD = СМООІЈ CPRINT Срам GAAN 
WE BUITEN ZITTENIJCPRINT CO , JA ...1 
WAIT 50 

PRINT CNOU IK GA MAAR WEER EENSJ 

PRINT CTOT ZIENS] 

END 


Dit programma kan resulteren in het volgende 'praatje': 


HOE IS HET WEER VANDAAG ? 
?М001 
DAN GAAN. WE BUITEN ZITTEN 
NOU IK GA MAAR WEER EENS 
TOT ZIENS 

of 


HOE IS НЕТ WEER VANDAAG ? 
PAFSCHUWELIJK , HET REGENT NOG STEEDS 
ES Gn 

NOU IK GA MAAR WEER EENS 

TOT ZIENS 


Aan deze programma's is goed te zien dat Logo niet zomaar een taal 
is. Logo heeft enkele zeer belangrijke kenmerken die nu achtereen- 
volgens besproken worden. Hier zijn de vier belangrijkste kenmerken: 


a. Logo is interactief; 

b. Logo is procedureel; 

с. Logo is uit te breiden met door u zelf gedefinieerde opdrachten 
en procedures; 

d. Logo beschikt over de mogelijkheid dat procedures zichzelf aan- 
roepen (recursie). 


Er volgt nu een beschrijving van deze vier Logo-aspecten onder 
andere aan de hand van de twee bovenstaande voorbeelden. 


a. Logo is interactief 


In tegenstelling tot veel andere talen is Logo interactief. Dat wil 
zeggen dat het mogelijk is om met Logo iets te proberen en daarvan 
meteen het resultaat te zien. 

Als we bijvoorbeeld FORWARD 100 typen en daarna op de 
return- (of enter-) toets drukken, zien we ogenblikkelijk het resul- 
taat van deze opdracht: de Turtle loopt 100 stapjes vooruit en 
tekent zo een lijn op het beeldscherm. 


Als we typen PRINT "HALLO en daarna return, zien we ogen- 
blikkelijk de boodschap HALLO op het scherm. 

Ook een iets ingewikkelder opdracht wordt direct uitgevoerd. 
De tafel van 127? Dat is geen enkel probleem, kijk maar eens naar 
deze eenregelige opdracht: 


MAKE ”A 127 REPEAT 10 CPR :A MAKE "A :A + 1271 


Natuurlijk krijgen we zo alleen de uitkomsten en niet de bewer- 
kingen zelf in beeld, maar daarover later meer. 

Omdat Logo interactief is, is het een uitermate geschikte taal 
voor kinderen. De kinderen zien immers ogenblikkelijk het resultaat 
van hun opdracht. 


b. Logo is procedureel 


We noemen Logo een proceduretaal. Dit betekent dat een groot! pro- 
grammeerprobleem in Logo als het ware wordt opgesplitst in vele 
'kleintjes'. 

Om maar eens iets te noemen: er moet een huis getekend worden. 
Laten we zeggen dat een huis onder andere bestaat uit muren, 
ramen, een deur, een dak en een schoorsteen. Schrijven we nu een 
BASIC-programma voor het tekenen van zo'n huis, dan wordt het 
een heel verhaal. Weliswaar kunnen we de verschillende onderdelen 
van het huis via subroutines laten tekenen, maar toch blijft het min 
of meer ongestructureerd. 

Schrijven we ditzelfde programma in Logo, dan gaan we als 
volgt te werk. Eerst maken we een programmaatje voor de muren. 
Werkt het? Mooi, аап gaan we verder met een programmaatje voor 
de ramen, enzovoorts. Uiteindelijk krijgen we dan één hoofdproce- 
dure die we HUIS zullen noemen en vijf subroutines, te weten: 
MUREN, RAMEN, DEUR, DAK en SCHOORSTEEN. Het Logo- 
programma kan er zo uitzien: 


EBLT HUIS 
MUREN 

RAMEN 

DEUR 

DAK 
SCHOORSTEEN 
END 


Voordat dit programma foutloos werkt zullen natuurlijk wel eerst 
de subprocedures MUREN, RAMEN, DEUR, DAK en SCHOORSTEEN 
geschreven moeten worden. Een voordeel is dat we de procedures 
overal kunnen gebruiken. Willen we bijvoorbeeld een kasteel maken, 
dan zouden we daarbij de procedure RAMEN rustig kunnen gebrui- 
ken. 

Iedere procedure heeft zijn specifieke taak. De procedure HUIS 


heeft tot taak een huis op het scherm te laten verschijnen. 

We hebben HUIS nu gebruikt als hoofdprocedure; HUIS kunnen 
we echter ook als subprocedure, dus als onderdeel van een andere 
hoofdprocedure, gebruiken. We kunnen bijvoorbeeld аап een hoofd- 
procedure "DORP denken, een tekening met meerdere huizen. Wel- 
licht kan het volgende overzicht verhelderend werken: 


Niveau 1: Niveau 2: Niveau 3: 


EDIT “DORP 


REPEAT 10 L 


HUIS EDIT "HUIS 


EDIT "МИВЕМ 
MUREN EAT 4 CFD 50 RT 901 END 
EDIT "RAMEN 


RAMEN 


ett EE RV анаға 
END 
VERPLAATS 1 EDIT "VERPLAATS 

| PU SETH RANDOM 360 
FD RANDOM 100 PD 
SETH 0 


END 


Op niveau 3 vinden we de procedure MUREN. Deze wordt op 
niveau 2 gebruikt in de procedure HUIS. De procedure HUIS wordt 
op zijn beurt op niveau 1 weer gebruikt in de procedure DORP. 
Eigenlijk is het heel eenvoudig. 


с. Logo is uitbreidbaar 


De taal Logo heeft de beschikking over veel opdrachten en bewer- 
kingen. Logo-woorden noemen we ‘primitieven! (primitives). Het 
mooie van Logo is nu, dat iedereen zijn of haar eigen primitieven 
kan schrijven. Eigenlijk zagen we dat al in het schema hierboven. 
Hoewel Logo niet beschikt over een woord als "VERPLAATS, hebben 


10 


we dit zelf аап де standaardopdrachten, zoals FORWARD en PRINT, 
toegevoegd. Wanneer ме VERPLAATS intypen, zetten we de proce- 
dure VERPLAATS in werking. Logo accepteert de naam van een 
zelfgedefinieerde procedure, zoals VERPLAATS, op dezelfde manier 
als de al in Logo aanwezige opdrachten, zoals bijvoorbeeld PRINT. 

Op deze manier kan iedere gebruiker zijn eigen taal maken en 
die woorden en hulpprogramma's aan Logo toevoegen die voor hem of 
haar handig en gemakkelijk in het gebruik zijn. 

Verderop in dit boek worden zeer veel nuttige hulpprocedures 
gegeven die iedereen naar hartelust kan veranderen, aanpassen en 
toevoegen aan het Logo-systeem. Misschien is de NederLogo (zie 
verderop in dit boek) wel de duidelijkste illustratie van deze moge- 
lijkheid. Deze mogelijkheid is overigens ook in een taal als Forth 
aanwezig. 


d. Logo beschikt over de mogelijkheid dat procedures zichzelf aan- 
roepen (recursie) 


Logo-procedures kunnen recursief zijn. Recursie is een zeer krach- 
tig aspect van Logo met zeer veel gebruiksmogelijkheden. Maar wat 
is nu precies 'recursie'? Hoewel later, bij de bespreking van de 
Turtle Graphics, nog expliciet op recursie ingegaan zal worden, volgt 
nu vast een korte omschrijving van het begrip. Als de computer (in 
Logo) een bepaalde procedure aan het uitvoeren is en hij komt daar- 
in zijn eigen naam (die van de procedure) tegen, dan gaat de com- 
puter de procedure nogmaals uitvoeren. De procedure roept zichzelf 
als het ware aan. In BASIC zou je het een soort LUS kunnen noe- 
men. Op zich natuurlijk niets spectaculairs. 

De procedure roept zichzelf steeds opnieuw aan en dit kan, als 
we niet ingrijpen, eeuwig zo doorgaan. Het bijzondere schuilt in het 
feit dat de voorbeeldprocedure steeds een iets andere uitwerking 
heeft. Op deze manier kunnen we tot prachtige resultaten komen. 
De onderstaande tekeningen zijn bijvoorbeeld allemaal gemaakt met 
recursieve procedures. 


11 


Later, bij de beschrijving van de afzonderlijke Logo-werelden, 
zullen we het begrip recursie nog vele malen tegenkomen. 


14 De vier Logo-werelden 


De mogelijkheden van Logo als computertaal zullen in dit boek 
besproken worden aan de hand van een indeling in leeromgevingen. 
De term 'leeromgeving' is, zoals we al eerder zagen, afkomstig uit de 
ontwikkelingspsychologie van Jean Piaget. 

De term leeromgeving laat een stukje zien van de visie die de 
makers van Logo op het onderwijs hadden. Ter illustratie het vol- 
gende citaat van Seymour Papert: "Ik geloof dat de alom aanwezige 
computer ons in staat zal stellen de leeromgeving buiten de school- 
klas zo te veranderen dat veel, zo niet alle kennis die de school 
tegenwoordig met veel pijn en moeite en met zo weinig succes pro- 
beert bij te brengen, geleerd kan worden zoals het kind leert spre- 
ken, dus moeiteloos, met succes en zonder georganiseerde instruc- 
Не." 

Ор Paperts onderwijsvisie zullen we later nog ingaan. Ме beper- 
ken ons eerst tot de leeromgevingen, ook wel Logo-werelden 
genoemd. De vier Logo-werelden laten elk een ander aspect van 
Logo zien. Ze kunnen afzonderlijk, in samenhang of tegelijkertijd 
worden aangesproken. Het zijn: 


De Schildpadwereld 
De Taalwereld 

De Muziekwereld 
De Sprokenwereld 


росе 
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a. De Schildpadwereld 


Dit is de wereld van de Turtle Graphics en dit is wat de meeste men- 
sen van Logo kennen. Het is de wereld van het tekenen en rekenen, 
van lijnen, hoeken, kleuren en vormen. De schildpadwereld is een 
zeer uitgebreide wereld en biedt veel mogelijkheden. 

Oorspronkelijk is de taal Logo ontwikkeld zonder Turtle 
Graphics. Іп de schildpadwereld wordt gesproken over de 'Turtle 
Geometry', de Turtle-wiskunde: tekenen en rekenen met de Turtle 
als uitgangspunt. Dit is, en zeker niet alleen voor kinderen, een 
zeer uitnodigende wereld. 


b. De Taalwereld 


In de Logo-taalwereld zien we pas echt de zeer nauwe verwantschap 
met de kunstmatige intelligentie: manipuleren met woorden, lijsten 
en variabelen, of het nu om een 'kaartenbak', een 'adventure', een 
‘vertaalprogramma' of een 'tekstverwerker!' gaat. Deze voorbeelden 
komen in de desbetreffende hoofdstukken aan de orde. 

Logo-taal is de wereld van LISP. LISP (de taal waarin de meeste 
programma's met kunstmatige intelligentie zijn geschreven) is een 
taal die in eerste instantie is ontworpen om lijsten met symbolen te 
manipuleren. In de Logo-taalwereld herkennen we deze toepassingen. 
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с. De Muziekwereld 


Op zichzelf beschouwd is deze Logo-wereld niet zo bijzonder. Wat 
betreft de muzikale mogelijkheden hebben andere programmeertalen 
meer te bieden. Denk maar eens aan Simon's BASIC (van Commodore) 
of een assembleertaal. Moeten we deze wereld dan maar overslaan? 

Het antwoord zou Ча! geweest zijn, ware het niet dat we ook 
hier de unieke mogelijkheden van Logo kunnen hanteren. Binnen 
Logo, dus ook binnen de muziekwereld, heeft elke gebruiker de 
mogelijkheid zijn eigen wereld, zijn mierowereld, te ontwerpen. 
Omdat Logo uitbreidbaar is en uit procedures is opgebouwd kan 
iedere gebruiker zijn eigen accenten leggen, daar waar zijn inter- 
esse ligt. Toegegeven, Logo-muziek mag dan niet de uitgebreidste 
muziekprogrammeermogelijkheid zijn, het is wel bijzonder gebruikers- 
vriendelijk en stelt iedereen in staat op zijn eigen niveau en naar 
eigen interesse te werken. 

Illustraties worden gegeven in het hoofdstuk Logo-muziek. 


d. De Sprokenwereld 


De sprokenwereld is de wereld van de animaties, van de bewegende 
beelden. Ten aanzien van deze Logo-wereld geldt eigenlijk precies 
hetzelfde verhaal als voor de Logo-muziekwereld. Ook in BASIC en 
assembleertaal zijn veel animatiemogelijkheden, maar Logo is gebrui- 
kersvriendelijker. De animatiemogelijkheden in Logo zijn zeer uitge- 
breid; we noemen het ontwerpen van sproken (in BASIC 'sprites! 
genoemd), de When Demons! en de 'Collision'. 

Misschien zijn dit voor u nog wat vage begrippen, maar later in 
het boek zullen ze zeer uitvoerig besproken worden. 


Dit waren de vier Logo-werelden, de leeromgevingen. Het is zeer 
goed mogelijk in Logo programma's te schrijven waarin gebruik 
gemaakt wordt van alle vier de werelden. Denk bijvoorbeeld maar 
eens aan een ‘adventure!. Dan kunnen we: 


ө Turtle Graphics gebruiken voor de illustraties van het verhaal; 

e Taal gebruiken voor het vraag- en antwoordspel van de adventure; 
ө Muziek gebruiken voor de geluidseffecten (+ openingstune?); 

ө Sproken gebruiken voor de animaties, de bewegende beelden. 


In het boek zijn zeer veel voorbeelden te vinden van deze combina- 
ties van werelden, 


Hoofdstuk 2 
DE LOGO SCHILDPADWERELD 


EE 
Ge: сақ 
Geer 
шеге 
әже 


ДШ ЖЕ, 
' . 
101 ИДИТ ТТ 
А. ШЕГЕ ТІЛГЕН 


(/ 
Л 


bk _ Véi үү Dy 


en, A И Н 2! 
Ae e A, A АЫ ZER 
EE GA 


сЫі 


Ж. Ж 
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2.1 De schildpadwereld, een inleiding 


Пе schildpadwereld, of de wereld van de Turtle Graphies, is wellicht 
voor de meeste mensen het meest herkenbare van Logo. De meeste 
mensen zullen ook door het zien van een of meerdere tekenende 
schildpadden voor het eerst in contact zijn gekomen met de program- 
meertaal Logo. 

De wereld van de Turtle Graphics is, hoewel slechts één van 
de vier Logowerelden, toch wel zeer fascinerend. Met de Turtle 
Graphies, hoewel niet exclusief voor Logo, komen we in een wereld 
van lijnen, vormen en kleuren. Een wereld die zich kenmerkt door, 
wat Papert noemde, de 'Turtle Geometry'. Turtle Geometry betekent: 
schildpad-georiënteerde meetkunde. Wat dit inhoudt zal u hopelijk 
na het lezen van dit hoofdstuk duidelijk zijn. 

Om de schildpadwereld te kunnen binnengaan zullen we de 
‘Turtle! moeten oproepen. We doen dat met de opdracht SHOW 
TURTLE, afgekort als ST. Na het intoetsen van deze twee letters, 
gevolgd door RETURN (of ENTER) zien we midden op het scherm 
een schildpad verschijnen. 


Opmerking. Bij sommige Logo-versies verschijnt niet een vorm van 
een schildpad, maar een driehoekje. 


Willen we de Turtle weer laten verdwijnen, dan is HT (HIDE 
TURTLE) voldoende. 

Om te tekenen zullen we de Turtle in beweging moeten zetten. 
In principe kunnen we twee kanten op: vooruit (in Logo: FORWARD) 
of achteruit (in Logo: BACK). 

De woorden FORWARD en BACK, primitieven geheten, vormen 
welhaast de belangrijkste opdrachten in de Turtle Graphies. Ook 
hier kunnen we afkortingen gebruiken, namelijk FD en BK. 

Toetsen we nu FD en RETURN of ENTER in, dan doet de Turtle 
niets. Wel krijgen we de volgende boodschap in beeld: 


NOT ENOUGH INPUTS TO FD (of FD NEEDS MORE INPUTS 
of een Nederlandstalige melding) 


Dat betekent dat Logo met alleen de opdracht FD niets kan doen; er 
moet nog iets bij, namelijk het aantal stappen dat vooruit gelopen 
moet worden. Bij de opdracht FD 100 (+ RETURN) zien we de Turtle 
razendsnel 100 stappen vooruitgaan. Hierbij laat hij een spoor achter 
zich. Zo kunnen we ook weer terug. Dat doen we met BK 100 

(+ RETURN). Denk eraan dat na FD en BK een spatie moet staan. 
Begrijpt u nu waarom Logo een interactieve taal genoemd wordt? 

De uitgangspositie van de Turtle, midden op het beeld wordt de 
thuispositie genoemd; deze duiden we in Logo aan met HOME. De 
Turtle staat dan met zijn neus verticaal naar boven (noordrichting). 
Waar de Turtle zich op het beeldscherm ook bevindt, steeds als we 
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HOME intoetsen zal hij terugkeren naar deze thuispositie waarbij hij 
een spoor achterlaat. 

En nu de richting. Hoe kunnen we de Turtle laten draaien? Als 
we hem naar rechts willen draaien gebruiken we gewoon RIGHT (RT 
dus) en naar links LEFT (LT). Zouden we zomaar RT (+ RETURN) 
intoetsen dan krijgen we: 


NOT ENOUGH INPUTS TO RT 


Achter de woorden RT en LT moeten we een getal intoetsen, name- 
lijk het aantal graden dat de Turtle moet draaien. Bij RT 90 draait 
de Turtle over 90° naar rechts, bij LT 270 draait hij 270° naar links, 
hetgeen hetzelfde resultaat geeft! 

Zo zien we dat RT 90 hetzelfde resultaat geeft als LT 270 en 
RT 180 hetzelfde resultaat geeft als LT 180. 

Om het scherm schoon te maken gebruiken we CS (Clear Screen) 
voor het grafische deel van het scherm, en CT (Clear Text) voor 
het tekstgedeelte. 

Met de vier opdrachten FD, BK, RT en LT is bijna elke denkbare 
tekening te maken. 

Als voorbeeld gaan we een vierkant maken. Dat doen we zo. 
Eerst laten we de Turtle 100 stappen vooruit (op het scherm verti- 
caal naar boven) lopen met FD 100, daarna draaien we hem 90° 
rechtsom met RT 90. De looprichting is nu horizontaal naar rechts; 
we toetsen opnieuw FD 100. Om een vierkant te krijgen zullen we 
de Turtle nu opnieuw rechtsom moeten draaien, dus ... RT 90. Dit 
doen we nog twee keer. Uiteindelijk krijgen we dit: 


FD 100 RT 30 FD 100 RT 90 FD 100 RT 90 FD 100 RT 90 


Zo ontstaat een keurig vierkant. *) 

Op zichzelf is deze manier van het gebruiken van Logo-opdrach- 
ten niet onjuist, maar wel heel erg omslachtig. Het blijkt namelijk 
dat we bij het tekenen van een vierkant twee opdrachten vier maal 
moeten herhalen, namelijk de opdrachten FD 100 en RT 90. De 
REPEAT-opdracht kan ons hierbij helpen. 

REPEAT is een herhaalopdracht en in dit voorbeeld kunnen we 
hem zo gebruiken: 


REPEAT Y EFD 100 RT 303 


Denk erom: REPEAT moet altijd gevolgd worden door een spatie, een 

getal en de opdrachten die herhaald moeten worden. Deze opdrachten 
(het kan ook een procedure zijn) moeten altijd tussen vierkante haak- 
jes (L en 1) geschreven zijn. 


ж) Bij veel computers is 100 stappen in verticale richting niet "еуеп lang' als 100 stap- 
pen in horizontale richting. We zien dan ook een keurige rechthoek in plaats van een 
keurig vierkant. Praktisch elke Logo beschikt over een opdracht (.ASPECT of 
.SETSCR) om deze resolutie bij te stellen. Zoek naar de juiste waarde voor uw sys- 
teem zodat het een echt vierkant wordt (kijk in uw handleiding). 
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Opmerking. Denk erom dat Logo, in tegenstelling tot bijvoorbeeld 
BASIC, grote waarde hecht aan het juiste gebruik van spaties. 
FD50 en REPEAT4 worden door Logo niet herkend. Mocht dit toch 
eens gebeuren dan krijgen we de boodschap: 


I DON’T KNOW HOW TO REPEAT 
of: "HERE "SG NO PROCEDURE NAMED REPEAT4 


Dit betekent dat Logo het woord REPEAT4 niet als opdracht (of als 
procedurenaam) herkent. Dat is gewoon een kwestie van wennen en 
zorgvuldig formuleren (en intoetsen). 


Voordat we het maken van procedures gaan bespreken volgen 
nog enkele tekeningen; allemaal gemaakt met de opdrachten FD .., 
BK ,., КТ Әдеп LT 97, 


2.2 Procedures maken 


Tot nu toe hebben we іп Logo steeds gewerkt in de 'Direct Model, 
Dat wil zeggen: elke opdracht werd па 'RETURN' direct uitgevoerd. 
Maar Logo biedt de gebruiker ook de mogelijkheid om programma's 
te maken. In Logo noemen we een programma een procedure, zodat 
we deze term verder zullen gebruiken. Er zijn bijvoorbeeld proce- 
dures om een vierkant, een huis of een boot te tekenen. Maar ook 
procedures om muziek te maken, of een animatie of een taalspel. 

Procedures maken doen we in de Editor. De Logo Editor roepen 
ме op met EDIT "... of met ТО... . Achter het "-іекеп bij EDIT 
komt de procedurenaam te staan, want in Logo heeft iedere proce- 
dure een eigen naam. Pas ор! Bij sommige Logo's moet het "-teken 
juist weggelaten worden! 

Laten we als voorbeeld eens een procedure schrijven om een vier- 
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kant te tekenen. We zagen eerder al met welke opdrachten de Turtle 
een vierkant tekent. We zouden de procedure iedere naam kunnen 
geven, maar voor het gemak en de overzichtelijkheid noemen we de 
procedure gewoon VIERKANT. Dus toetsen we EDIT "VIERKANT 
(denk weer goed om de spaties) in. Als we vervolgens RETURN 
geven komen we in de Logo Editor. Op het scherm staat nu TO VIER- 
KANT. Nu wacht Logo op de opdrachten die we іп de procedure wil- 
len opnemen. 

De opdrachten om een vierkant te tekenen kennen we inmiddels, 
zodat de procedure VIERKANT er zo uit komt te zien: | 


EDIT "VIERKANT 
REPEAT Ч [FD 100 RT 3902 
END 


Elke procedure heeft END als laatste opdracht. 


We verlaten de Logo Editor (bij Atari Logo) met de ESC-toets. 
Bij sommige Logo's zijn er andere methoden (bij BBC Logo bijvoor- 
beeld met de COPY-toets); kijk hiervoor in uw handleiding. We zijn 
uit de Logo Editor! 

Logo laat zien dat de procedure VIERKANT in het werkgeheugen 
is opgeslagen door te melden: 


VIERKANT DEFINED 


Maar hoe roepen we de procedure nu aan? Om de procedure te 
laten uitvoeren hoeven we hem alleen maar aan te roepen door het 
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intoetsen van de proecedurenaam (+ RETURN), in dit geval VIER- 
KANT. Op het moment dat we return geven treedt de procedure in 
werking en wordt een vierkant getekend. 

En als we nu iets willen veranderen in de procedure? Dat is geen 
probleem, even opnieuw oproepen met EDIT "VIERKANT еп... daar 
is hij. Nu kan er het een en ander veranderd worden. Verlaat de 
Editor weer ор de bekende manier. 

Zijn er nog meer procedures? 

Kijk maar eens: 


EDIT "DRIEHOEK 
REPEAT 3 CFD 100 ЕТ 1203 
END 


en deze: 


EDIT ”CIRKEL 
REPEAT 36 EFD 10 RT 102 
END а 


Met EDIT kunnen we elke denkbare procedure schrijven, iedere 
procedure met een eigen naam. Al deze procedures worden door Logo 
opgeslagen in de WORKSPACE, het werkgeheugen. 

We kunnen de procedures aanroepen door het intoetsen van hun 
naam. We kunnen ze echter ook door een andere procedure laten 
aanroepen. Kijk maar eens: 


EDIT GIER 
REPEAT ЭБ ГМТЕККАМТ RT 103 
END 


Als we deze procedure (STER dus) aanroepen door STER 
(+ RETURN) in te toetsen gebeurt het volgende. De Turtle tekent 
een vierkant (want de procedure VIERKANT hadden we al, nietwaar) 
en draait dan over 10 graden rechtsom. Dan tekent hij nog een vier- 
kant en draait weer 10 graden rechtsom, en dan nog eens en nog 
eens en ..., in totaal 36 keer. Tenslotte komt de Turtle weer bij 
zijn beginpunt terecht, want 36 keer 10 graden is 360 graden (en 
dus een ‘volledige draai'). 

We hebben de procedure VIERKANT gebruikt in een procedure 
STER. VIERKANT is nu de sub- en STER de hoofdprocedure. Dit 
kunnen we ook met de andere procedures doen, kijk maar: 


EDIT ”"ЗОКІЕНОЕК 
REPEAT З CDRIEHOEK RT 120] 
END 


of 
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EDIT ”SDRIEHOEK 
REPEAT 6 CDRIEHOEK RT 601 
END 


Natuurlijk kunnen we Logo ook voor ons laten rekenen. We za- 
gen dat als we de Turtle één keer volledig rond willen laten draaien 
de totale draaihoek 360 graden moet zijn. Dit betekent dat het pro- 
dukt van het aantal keren dat we de driehoek willen tekenen en de 
hoek waarover de driehoek moet draaien gelijk is aan 360 (3 x 120, 
6 x 60). Deze regel passen we in het volgende voorbeeld toe: 


EDIT ”PDRIEHOEK 
REPEAT 360/22 CDRIEHOEK ЕТ 223 
END 


Succes verzekerd! Logo rekent nu zelf het aantal keren uit dat de 
Turtle een driehoek moet tekenen. 


23 Variabelen 


27/7) 


De procedure VIERKANT is natuurlijk best wel aardig maar met deze 
procedure kunnen we alleen maar vierkanten tekenen met zijden van 
100 stappen. Om met dezelfde procedure verschillende vierkanten 
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te kunnen tekenen moeten we het aantal stappen variabel maken. 
Kijk maar eens: 


EDIT "VIERKANT :STAP 
REPEAT Ч CFD :STAP ЕТ 801 
END 


Achter de procedurenaam hebben we nu een variabele gezet die 
STAP heet. Om Logo te laten zien dat het een variabele (en geen 
procedure) is zetten we er een dubbele punt voor, :STAP dus. De 
variabele :STAP wordt gebruikt om de Turtle te vertellen hoeveel 
stappen hij FORWARD (FD) moet gaan. Door in te toetsen 
VIERKANT 133 geven we de variabele :STAP de waarde 133. De 
Turtle zal nu de opdracht FD 133 uitvoeren (en natuurlijk де ап- 
dere opdracht in VIERKANT). Als we echter VIERKANT 12.5 in- 
toetsen krijgt de variabele :STAP de waarde 12.5, en daarmee ver- 
valt zijn vorige waarde (dat was 133). Op deze manier kunnen we 
elk gewenst vierkant tekenen. En dat met slechts één procedure. 

Toetsen we - per ongeluk - alleen VIERKANT in, dus zonder 
getal, dan zal Logo antwoorden met: 


NOT ENOUGH INPUT TO VIERKANT 


(of een andere foutmelding, afhankelijk van uw Logoversie) 
Met andere woorden: de procedure VIERKANT kan zonder waarde 
voor de variabele :STAP niet worden uitgevoerd. 


Opmerking. Het is niet noodzakelijk om een variabele een echt woord 
als naam (bijvoorbeeld STAP) te geven. Een variabele mag ook X 
heten of 77. Het is echter wel aan te raden de variabele te benoemen 
(zeker in het begin). Experimenteer maar eens wat met variabelen. 


Als we een procedure als subprocedure willen gebruiken moeten 
we de eventueel daarin gebruikte variabelen ook bij de hoofdproce- 
dure vermelden: 


EDIT "STER. :STAP 
REPEAT 36 CUIERKANT :STAP RT 101 
END 


Wilt u meer variabelen gebruiken? Dat is geen enkel probleem, 
kijk maar: 


EDIT ”SUPERSTER :STAP :HOEK 
REPEAT ЗБО/:НОЕК CUIERKANT :STAP РТ :HOEKJ 
END 


Nu hebben we zowel de stapgrootte (door de variabele :STAP) 
als de hoekgrootte (door de variabele :HOEK) variabel gemaakt. 
Logo rekent dan zelf weer het aantal keren uit dat hij een vierkant 
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moet tekenen. Dit doet Logo door 360 (een volledige draaiing) te 
delen door de waarde van de variabele :HOEK. Heeft :HOEK de 
waarde 20 dan worden er 18 vierkanten getekend. Heeft :HOEK de 
waarde 3 dan worden er 120 vierkanten getekend. Dit geeft met 
slechts een paar procedures zeer veel mogelijkheden. We kunnen nu 
bijvoorbeeld intoetsen: | 


SUPERSTER SS. 27.5 
SUPEFRFSIER Е ES С 
SUPERSTER 100 120 


En steeds krijgen we een nieuwe figuur. 
We kunnen echter de variabelen ook nog op een andere manier 
een waarde geven. Dat doen we dan met MAKE: 


MAKE ”STAP 100 (Denk erom niet :STAP) 


Hiermee maken we een variabele die we STAP (denk aan de ") noemen, 
en we geven de variabele de waarde 100. Toetsen we nu in 
PRINT :STAP, dan is het resultaat 100. We gebruiken de aanhalings- 
tekens dus alleen om een nieuwe variabele te definiëren. Is de varia- 
bele al bekend (en heeft deze al een waarde) dan gebruiken we de 
dubbele punt voor de naam van de variabele. 

Goed, op dit moment heeft de variabele STAP de waarde 100. 
Kijk nu eens naar: 


MAKE "STAP :STAP + 100 


We maken een nieuwe variabele STAP, die de waarde heeft van de 
oude variabele :STAP (100) vermeerderd met 100. De variabele 
:STAP heeft nu dus de waarde 200. 

Dit kunnen we zo gebruiken: 


EDIT "BLOKKENDOOS :STAP :KEER 
REPEAT :KEER CUIERKANT :STAP MAKE "STAP :STAP + 101 
END 


BLOKKENDOOS 20 5 zal dus 5 keer een vierkant tekenen. Eerst een 
vierkant met zijden van 20 stappen, dan een vierkant met zijden van 
30 stappen, met zijden van 40 stappen, 50 stappen en tenslotte met 
zijden van 60 stappen. Dit komt doordat de variabele :STAP steeds 
met 10 verhoogd wordt. 

We hoeven een variabele niet altijd een getal als waarde te 
geven. Wanneer we zeggen MAKE "NAAM LOGO, zal de variabele 
:NAAM, als waarde LOGO krijgen. Wanneer we dan intoetsen PRINT 
:NAAM zal LOGO worden afgedrukt. Je zou :NAAM een tekstvaria- 
bele kunnen noemen, maar hierover in de Logo-taalwereld meer. 
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24 Recursie 


Iets bijzonders іп de Logo Turtle Graphics is recursie. Laten we 
eerst eens kijken naar wat Seymour Papert zelf over recursie zegt: 


"Кесигѕіе is een proces dat verwijst naar zichzelf. Omdat het naar 
zichzelf verwijst kan het ook naar zichzelf verwijzen terwijl het naar 
zichzelf verwijst. Om een vergelijking te maken: Het belangrijkste 
van denken is, dat je kunt denken over het denken. Je kunt zelfs 
denken over denken over denken. Logo heeft procedures die zich- 
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zelf aanroepen terwijl ze zichzelf aanroepen." 
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Duidelijk lijkt me ... of niet??? 


Kortom..., een recursieve procedure is een procedure die zichzelf 
aanroept. Dit kan eindeloos doorgaan, kijk maar eens naar dit voor- 
beeld: | 


EDIT ”М,ІЕККАМТ 

REPEAT Ч CFD 100 RT 901 
VIERKANT 

END 


Omdat de procedurenaam in de procedure zelf is opgenomen zal de 
Turtle, wanneer hij de procedure uitvoert: 


ө eerst de opdracht REPEAT 4 [FD 100 RT 901 uitvoeren 
ө daarna roept de procedure als het ware zichzelf aan en begint 
opnieuw. 


Het gevolg is dat де Turtle eindeloos de REPEAT -opdracht blijft 
herhalen. Steeds opnieuw wordt dus hetzelfde vierkant getekend. 
We kunnen de Turtle op een aantal manieren stoppen: 


1. op de BREAK-toets drukken; 
2. ееп 'SYSTEM RESET' uitvoeren; 
3. de computer afzetten. 


Allemaal radicale oplossingen en bovendien niet erg spectaculair. 
Gelukkig kunnen we dit ook anders oplossen. Kijk maar eens naar 
dit voorbeeld: 


EDIT "VIERKANT :STAP 

IF :STAP > 150 CSTOPJ 
REPEAT 4 CFD :STAP ЕТ 901 
VIERKANT :STAP + 5 

END 


Dit is een eenvoudige maar prima recursieve procedure. 


H 
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Laten we deze recursieve procedure eens аап een nader опаег- 
zoek onderwerpen. We zullen hem regel voor regel bekijken. 


@ De procedure heet VIERKANT en heeft als variabele :STAP. We 
starten de procedure dus bijvoorbeeld met VIERKANT 5. 

e IF :STAP >150 [STOP] is ееп testopdracht. Deze opdracht onder- 
zoekt of de variabele :STAP een waarde heeft die groter is dan 
150. Is dit het geval, dan stopt de procedure. 

e REPEAT 4 [FD :STAP RT 90] is de opdracht voor het tekenen van 

= een vierkant. Bij VIERKANT 5 is de waarde van de variabele 
:STAP dus 5 en zal de Turtle een vierkant tekenen met zijden van 
о stappen. Maar de waarde van :STAP verandert, dat zien we in 
de volgende regel: 

Ф VIERKANT :STAP + 5; hier wordt de waarde van de variabele 
:STAP vermeerderd met 5. (De opdracht MAKE "STAP :STAP + 5 
zou ook goed geweest zijn, maar zou dan binnen de procedure 
hebben moeten staan.) Deze laatste regel roept dus de procedure 
VIERKANT opnieuw aan. Alleen is de waarde van de variabele 
STAP veranderd en wordt het vierkant dus groter. 


De procedure roept zichzelf net zolang aan totdat de variabele :STAP 
een waarde heeft die groter is dan 150. 

Natuurlijk kunnen we ook de vergrotingsfactor variabel maken. 
Dat is zelfs nog veel interessanter: 


EDIT "VIERKANT :STAP :WVERGROTING 

IF ҰЗТАР->: 150 EELER? 

REPEAT Ч CFD :STAP RT 302 

VIERKANT :STAP + :VERGROTING : VERGROTING 
END 


Vergeet niet om in de laatste regel (waar de procedure zichzelf aan- 
roept) de variabele : VERGROTING te vermelden; anders zegt Logo 
iets als: 


NOT ENOUGH INPUTS TO VIERKANT 


H 
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Met deze en soortgelijke procedures kunnen we bijzonder aardige 
grafische figuren maken (zie figuren op de vorige bladzijde). 

Maar er zijn meer manieren om het uitvoeren van een recursieve 
procedure te laten stoppen. We kunnen bijvoorbeeld een teller in- 
bouwen, die bijhoudt hoe vaak de procedure zichzelf herhaalt. Kijk 
maar eens: 


EDIT “FIGUUR :STAP :HOEK : TELLER 
IF :TELLER < 1 CSTOPJ 

FD :STAP RT :HOEK 

MAKE "STAP :STAP + 10 

FIGUUR :STAP :НОЕК :TELLER - 1 
END 


Nu is de opdracht: 


IF :TELLER < 1 CSTOPJ 


de testopdracht. Omdat de variabele :TELLER steeds met 1 afneemt 
zal de procedure uiteindelijk stoppen als TELLER kleiner dan 1 
geworden is. 

Het zal u opgevallen zijn dat zowel de stapgrootte als de hoek 
variabel zijn. We kunnen uit een en dezelfde procedure dan ook een 
veelheid van figuren halen. Bijvoorbeeld met: 


FIGUUR 10 90 50 
FIGUUR 5 Ч5 50 
FIGUUR 10 120 50 
enz. 


Kijkt u maar eens naar de volgende voorbeelden. Ze zijn alle gemaakt 
met bovenstaande procedure: 
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Nog een manier om ееп recursieve procedure te stoppen is de 
volgende opdracht: 


IF КЕҮР Г5ТОР1 


КЕҮР is niet een Logo-opdracht, maar ееп Logo-functie. KEYP kijkt 
of er ook een toets ingedrukt wordt. Is dit zo dat zal de procedure 
stoppen. Voor alle duidelijkheid: het doet er niet toe welke toets 
ingedrukt wordt. 

Zullen we even een procedure met KEYP bekijken? 


EDIT “FIGUUR :STAP :HOEK :VERGROTING 

IF KEYP CSTOPJ 

FD :STAP 

RT :HOEK 

FIGUUR :STAP + :VERGROTING :HOEK :VERGROTING 
END 


Tot zover deze toepassingen van recursie. Het is de moeite waard 
hier terdege mee te experimenteren. Alleen op die manier leert u hoe 
u de meest fantastische tekeningen kunt maken. 


Bent u nu klaar voor een portie ‘recursie voor gevorderden'? Laten 
we dan eens gaan kijken naar de recursieve boom. | 

De recursieve boom is een - binnen Logo-kringen - bekende 
procedure om te laten zien dat recursie niet per se 'tail-end' (аап 
het eind van de procedure) hoeft te staan. Recursie kan ook, meer- 
dere malen zelfs, middenin een procedure staan. Kijk maar eens naar 
deze, op het eerste gezicht wat vreemde, procedure: 
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EDIT ”BOOM :5ТАР 

IF :STAP < 18 [STOP] 
ЕВ :STAP 

RT 45 

BOOM СЗ * :STAP / 3) 
LT 90 

BOOM (3 * STAP / Ч) 
кі ча 

ВК :5ТАР 

END 


Nu volgen enkele opmerkingen over deze procedure. We zullen 
hem eens stap voor stap volgen. 

Opvallend is dat de procedure BOOM maar liefst drie keer wordt 
aangeroepen. We nemen als voorbeeld een stapgrootte van 32. 


Opmerking. Met kleinere hoeken wordt de boom veel mooier! In 
plaats van RT 45 bijvoorbeeld RT 15 en in plaats van LT 90 bij- 
voorbeeld LT 30. Probeert u het maar eens. 


Voor alle duidelijkheid wordt hieronder aangegeven wat er in de pro- 
cedure gebeurt. 


Bovenaan bladzijde 30 kunt u zien wat de Turtle doet als :STAP de 
waarde 32 heeft. 

Let op de manier van inspringen. Dit geeft de verschillende 
procedureniveaus aan. 


Niveau 1: Hier heeft :STAP de waarde van 32 en worden de op- 
drachten FD en RT uitgevoerd. 

Niveau 2: Hier heeft :STAP de nieuwe waarde van 24 (3/4 van de 
oude waarde) en worden wederom de opdrachten FD en 
RT uitgevoerd. 

Niveau 3: Hier heeft :STAP de nieuwe waarde van 18 (3/4 van de 
oude waarde) en worden de opdrachten FD en RT uit- 
gevoerd. 
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BOOM зг 
ЇР ЗЕ C 18 EST? 
го 3g 
RT 45 
BOOM 24 (= 3 MAAL 32 GEDEELD DOOR H) 
BOOM еч 
IF 29 < 18 CSTOPIJ 
FD оч 
к: 40 
BOOM 18 (= 3 MAAL 24 GEDEELD DOOR H) 
BOOM 18 
IF ТӨ < 76 USTDP3 
FD 18 
NI qS 
BOOM 13 (= 3 MAAL 18 GEDEELD DOOR 80 
BOOM 13 
IF 19 < 18 TIIDPJ 
LT 90 
BOOM 13 
BOOM 13 
IF 13 < 18 CSTOPJ 
РТ Ч5 
ВК 18 
END 
Li e 
BOOM 18 
BOOM 18 
ІР 18 < 18 ГЭТОРЈ 
FD 18 
RI MS 
BOOM 13 
BOOM 13 
IF 13 < 1B Г5ТОР3 
LI 90 
BOOM 13 
BOOM 13 
АҒ 13 < 18 СЕТОРҘ 
КТ 45 
ВК 18 
END 
Ri NS 
BK 18 
END 
TEEN о. 1..5 кет và 


Niveau 4: Hier heeft :STAP de nieuwe waarde van 13 (3/4 van de 
oude waarde) en springt de procedure terug naar het 
derde niveau, omdat 13 kleiner is dan 18. Nu wordt ech- 
ter de opdracht LT 90 uitgevoerd. 


31 


De test zorgt ег dus voor dat, als de waarde van :STAP kleiner dan 
18 wordt, de procedure naar een ander niveau springt. 

Ook heel aardig is het om Logo zelf de waarde van een variabele 
in een recursieve procedure te laten bepalen. We doen dat met de 
RANDOM-functie, waarmee we toevalsgetallen kunnen oproepen. 

In Logo werkt de RANDOM-functie als volgt: 


RANDOM 10 geeft ееп уап de volgende getallen: 0 1 23 4 5 6 7 8 of 9 


(RANDOM 10) + 1 geeft een van de volgende getallen: 1 23 4 56 7 8 
9 of 10 


Om Logo zelf de waarde van een variabele te laten bepalen zeggen 
we bijvoorbeeld: 


MAKE :STAP CRANDOM 10) + 5 


De waarde van de variabele :STAP wordt zo een van de gehele getal- 
Әб ог 16: 

Ме geven u een voorbeeld van een drietal procedures die zorgen 
voor een ‘levend schilderij’. Steeds wordt een willekeurige tekening 
gemaakt. Steeds wordt de waarde van de variabelen gewijzigd. Van 
tevoren kan aangegeven worden hoe vaak de hoofdprocedure zich 
moet herhalen. In totaal komen er vier variabelen in voor: 

:S (= de stapgrootte Leen RANDOM getall) 
:H (= de hoekgrootte Leen RANDOM getal) 
:V (= de vergrotingsfactor Leen RANDOM getal) 
:T (= de teller ... van tevoren aangeven) 
Hier zijn de procedures: 


EDIT ”SCHILDERIJ :T 
IF KEYP CSTOPJ 

ERN C:S "H :UJ 

KIES 

TEKENING :S "H :U 
WAIT 200 CS 
SCHILDERIJ :T — 1 
END 


EDIT ”КІЕ5 

MAKE ”S CRANDOM 10) + 5 
MAKE "H CRANDOM 802 + 45 
MAKE ”U CRANDOM 10) + 1 
END 


EDIT "TEKENING :S :H :U 
IF 5 > 150 CSTOPJ 

FD :S RT :H 

TEKENING :S + :U :H :U 
END 
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Op deze manier kunnen bijzonder aardige plaatjes ontstaan. Merk 
op dat met de opdracht ERN (ERASE NAME) de waarden van de va- 
riabelen worden gewist. 

We kunnen de functie RANDOM ook in een procedure, die dezelf- 
de structuur heeft als de procedure BOOM, gebruiken. Kijk maar: 


EDIT ”ZOMAARWAT : STAP 

IF :STAP < 10 CSTOPJ 

FD :STAP 

LT 1 + CRANDOM 3) * 30 
ZOMAARWAT :STAP - 1 

RT 90 

ZOMAARWAT :STAP + 1 

BK :STAP 

END 


De werking van deze ietwat vreemde recursieve procedure verschilt 
in wezen niet van die van de procedure BOOM. 


Natuurlijk kunnen we zoiets krachtigs als recursie ook voor geheel 
andere dingen gebruiken (we komen er later bij Taal, Muziek en 
Sproken nog uitgebreid op terug). 
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2.5 Logo pen- en kleuropdrachten 
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In deze paragraaf zullen we gaan kijken naar de verschillende pen- 
opdrachten en naar de uitgebreide kleuropdrachten. 


Opmerking. Hier zijn tussen de verschillende Logo-versies aanzien- 
lijke verschillen. Bekijk daarom zorgvuldig (indien u met een andere 
dan de LCSI Atari Logo werkt) de vergelijkingstabel achterin dit 
boek. 


We zullen ook bekijken hoe we figuren kunnen inkleuren, zodat 


tekeningen als deze (door kinderen gemaakt) kunnen worden verkre- 
gen. 
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De Turtle beschikt over een tekenpen, waarmee hij zijn 'spoor' 
op het scherm kan trekken. Als we Logo starten, en de Turtle met 
ST (= Show Turtle) aanroepen, staat de tekenpen van de Turtle 
klaar om te tekenen. In Logo zeggen we PD (Pen Down). Met PU 
(Pen Up) laten we de Turtle als het ware zijn pen van het papier 
(scherm) optrekken, zodat zijn spoor onzichtbaar wordt. Kijk maar 
eens: 


REPEAT 10 CPD FD 10 PU FD 103 


De Turtle tekent nu een keurige stippellijn. 

Ook zijn de opdrachten PD en PU erg handig (en bijna onmis- 
baar) om verschillende figuren los van elkaar te tekenen. Maar er 
zijn meer opdrachten die de toestand van de pen veranderen: 


PE (Pen Erase) en PX (Pen Reverse) 


De opdracht PE maakt van de tekenpen een vlakgum. Kijk maar: 


PD FD 100 WAIT 50 PE BK 100 


Eerst wordt een lijn getekend en meteen daarna wordt deze lijn weer 
uitgegumd. 


Opmerking. Met PE kan dus niet getekend worden!!! 


Een wel heel bijzondere Logo-penopdracht is PX ofwel Pen 
Reverse. Eigenlijk zou deze opdracht PR moeten heten, maar PR 
staat al voor PRINT. PX is een penopdracht die zowel tekent als 
gumt, een soort combinatie van PD en PE dus. Tekenen waar nog 
niets staat, en gummen waar wel iets staat, dat kan fascinerende 
effecten geven. Kijk maar eens: 


EDIT “VIERKANT :5 
REPEAT Ч CFD 28 RF 902 
END 


PX REPEAT З ГМІЕЕКАМТ 1003 


Ziet u wel? De eerste keer wordt een vierkant getekend, de tweede 
keer wordt het uitgegumd, en de derde keer weer getekend. 

PX kan ook gebruikt worden voor ‘animatie-achtige'! effecten. 
Wat te denken van bijvoorbeeld een vierkant dat 'groeit' ... 


EDIT ”GROEIVIERKANT :5 
IF (ВБ > 

PX REPEAT 2 LUIERKANT :53 
GROEIVIERKANT :5 + 5 

END 
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Opnieuw ееп recursieve procedure met een variabele :5 (STAP) die 
een steeds grotere waarde krijgt. De opdracht IF :S > 150 І5ТОР1 
kijkt of de waarde van :S meer dan 150 is. Is dit zo, dan stopt de 
procedure. 

Daarna wordt de opdracht Pen Reverse (PX) gegeven en maakt 
de Turtle tweemaal een vierkant: de eerste keer tekent hij en de 
tweede maal gumt hij. Daarna wordt de procedure opnieuw aangeroe- 
pen maar wordt de waarde van :S met 5 vermeerderd. 

Natuurlijk kunnen we hiermee ook een figuur laten verplaatsen. 
Kijk maar: 


PX HT REPEAT 10 [REPEAT 2 CUIERKANT 502 PU 
RT SO FP- 10 LT 90-РХЈ 


Deze een-regelige-opdracht (one-liner) (geschreven zonder proce- 
dure in de DIRECT MODE) is even simpel als doeltreffend en illus- 
treert op uitstekende wijze de mogelijkheden van een opdracht als 
PX. Nog een voorbeeld? 


PX HT REPEAT B [REPEAT 2 CUIERKANT ЗО Ј RT Ч51 


En wat krijgen we??? Een vierkant dat om zijn eigen as draait. 


Opmerking. Om een en ander wat sneller te maken is de Turtle on- 
zichtbaar gemaakt met de opdracht HT (Hide Turtle). 


Logo is niet alleen, wat de Turtle Graphics betreft, een wereld 
van figuren en vormen, maar ook zeker een wereld van kleuren. 
In LCSI Logo staan ons maar liefst zestien kleuren ter beschikking, 
terwijl iedere kleur ook nog eens acht tinten heeft. 

Iedere kleur wordt aangeduid met een nummer, waarbij het laag- 
ste nummer de donkerste tint heeft. Dit is het volledige kleuren- 
schema: 


Kat, agria 


8 - 25 = licht oranje 
16 - 23 = oranje 
24 - 31 = rood oranje 
32 - 39 = rose 
40 - 47 = paars 


48 - 55 = paarsblauw 
56 - 63 = blauw 1 
64 - 71 = blauw 2 

= licht blauw 
80 - 87 = turquoise 
88 - 95 = groen blauw 
96 - 103 = groen 
104 - 111 = geel groen 
112 - 119 = oranje groen 
120 - 127 = licht oranje 
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Willen we alle kleuren even bekijken? Dat kan met de volgende 
procedure, een handig middel om een mooie schermkleur uit te zoe- 
ken. Als de procedure is gestart kunnen we de beeldschermkleur 
veranderen door op een willekeurige toets te drukken. De procedure 
stopt als we 5 intoetsen. Het 'doorbladeren'!' уап de kleurenkaart 
kan dus met iedere toets (met uitzondering van de S) gebeuren. 
Hier is de procedure: 


EDIT ”KLEURENKAART :N 

SS HT SETBG :N CT 

PR CSE CHet kleurnummer is :J :N 
MAKE ”KEUS RC 

IF : KEUS: е "Б ТЭГО 
KLEURENKAART :N + 1 

END 


Met deze procedure kunnen we alle 127 kleuren van LCSI Logo bekij- 
ken, of een gedeelte daarvan. Zoeken we bijvoorbeeld een mooie 
kleur blauw, dan starten we de procedure met: 


KLEURENKAART HB 


en kunnen we van hieruit een geschikte kleur opzoeken. 


Opmerking. Wellicht staan in de procedure KLEURENKAART nog 
een paar onbegrijpelijke opdrachten. Deze worden in het volgende 
hoofdstuk (over Logo Taal) nader besproken. 


Er zijn drie dingen die we van kleur kunnen laten veranderen: 


1. het beeldscherm; 
2. de tekenpen (пеп); 
3. de Turtle(s). 


1. De kleur van het beeldscherm veranderen we met de opdracht: 


SETBG (gevolgd door een kleurnummer) 
of: BG (van BackGround) 


2. De kleur van de tekenpen (пеп) 


LCSI heeft de beschikking over drie tekenpennen met de nummers 
0, 1 еп 2. Als we Logo starten heeft de Turtle altijd pen 0 met als 
basiskleur 15. Pen 1 (te verkrijgen met de opdracht SETPN 1 = 
SETPenNumber) heeft als basiskleur 47. Pen 2 (te verkrijgen met 
de opdracht SETPN 2) heeft als basiskleur 121. 

Het veranderen van de penkleur doen we met de opdracht: 


SETPC :pen :kleur (soms PC van PenColour) 
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Vergeet niet om achter de opdracht SETPC te vermelden welke pen 
welke kleur moet krijgen. 


3. De kleur van de Turtle(s) 


Dat er meerdere Turtles zijn zullen we in de volgende paragraaf 
zien. Iedere Turtle kan een eigen kleur krijgen. We doen dat met: 


SETC :kleur 


Hoe we de verschillende Turtles aanspreken zullen we hierna zien. 


Het inkleuren van vormen kan op verschillende manieren gebeu- 
ren. Steeds zullen we echter gebruik moeten maken van de coördi- 
naten. 

In Logo kunnen we gebruik maken van de opdrachten SETX en 
SETY: 

ө SETX voor het definiëren уап X-coördinaten (horizontale Turtle 
positie) 

ө SETY voor het definiëren уап Y-coördinaten (verticale Turtle 
positie) | 

ө ХСОВ is ееп Logo-functie die Logo zelf laat uitzoeken wat де Х- 
coördinaat van de Turtle is. 

Ф YCOR is een Logo-functie die bepaalt wat de Y-coördinaat van de 
Turtle is. 


SETX en SETY zijn opdrachten, waarop de Turtle reageert. XCOR 
en YCOR zijn functies, waaraan Logo zelf waarden toekent. 

Zijn we met de Turtle aan het tekenen en vragen we: PR XCOR 
dan antwoordt Logo netjes met de juiste horizontale positie van de 
Turtle. Andere plaatsbepalende functies zijn: 


XCOR, YCOR (geeft de X-positie en Y-positie van de Turtle) 
HEADING (geeft de richting waarin de Turtle wijst; 0° is verti- 
caal naar boven) | 


Vergeet niet om als ае functiewaarden op het scherm afgedrukt moe- 
ten worden PR of PRINT (bijvoorbeeld PR XCOR) te gebruiken, 
anders kan Logo zoiets zeggen als: 


YOU DON'T SAY WHAT ТО DO WITH о 


We gaan eens kijken naar zo'n inkleurprocedure. Als voorbeeld 
nemen we weer een vierkant. We noemen de procedure KUBUS. 


EDIT- "KUBUS: :5 :K 

SEIPC O :K 

REPEAT :S CFD :5 SETX XCOR + 1 BK :5J 
END 
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Natuurlijk hoeven we niet alleen de hoogte (:S) variabel te maken, 
dat kunnen we ook met de breedte doen. We maken zo de procedure 
BLOK: 


EULI "KU :S iB IN 

ЗӘБІР Q +K 

REPEAT :В CFD :S SEIX SCOR + 1 BK :5 SETX XEDR + 1) 
END 


Wederom een procedure die even eenvoudig, als doeltreffend 
is. Door steeds de X-coördinaat met 1 op te hogen krijgen we als 
het ware allemaal lijnen naast elkaar. Zo ontstaat een ingekleurde 
- figuur. 

Er zijn echter nog andere manieren om figuren in te kleuren. 
Een ervan is deze: 


EDIT ”КІЕШКІМ :N 

IF IN m "Q mEt 
MAKE ”XPOS XCOR 

MAKE ”YPOS YCOR 

SEIK IKPA ЗЕТУ SPE Y 
SELA ATUS BELT :YPUS 


FD 1 

KEEURIN N =} 
END 

EDITI "KP 


MAKE ”КРХ ХСОЕ 
MAKE "KPY YCOR 
END 


Een waardevolle maar moeilijker procedure. Deze inkleurprocedure 
is pas te gebruiken wanneer we tijdens het tekenen een zogenaamd 
kleurpunt (KP) bepalen. Het inkleuren gebeurt namelijk doordat 
de Turtle steeds heen en weer loopt tussen zijn eigen coördinaten 
(die steeds veranderen; zie FD 1 in bovenstaande procedure) en 
het gekozen kleurpunt. 

Willen we dus een vierkant inkleuren dan moeten we de Turtle 
eerst het kleurpunt laten opzoeken. Bij een vierkant is dat het rech- 
terbovenhoekpunt (aangenomen dat de Turtle zich vlak voor het 
inkleuren in het linkerbenedenhoekpunt bevindt). Nu laten we de 
Turtle naar het kleurpunt gaan en leggen dit kleurpunt vast door 
het intoetsen van de procedurenaam KP. Daarna brengen we de 
Turtle terug naar het linkerbenedenhoekpunt van het vierkant. Pas 
dan kunnen we het vierkant inkleuren met KLEURIN :N. Voor :N 
geven we de lengte (aantal stappen) van de zijden van het vierkant 
op. Wij raden u aan zelf met dit inkleuren te experimenteren. 
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26 Het werken met meerdere Turtles 
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Een mooie mogelijkheid van LCSI Logo (en ook van vele andere Logo- 
versies) is het werken met meerdere Turtles tegelijk. In Atari LCSI 
Logo kan dat met maximaal vier Turtles. Zo kunnen we bijvoorbeeld 
meerdere Turtles tegelijk laten tekenen en we kunnen aardige anima- 
ties maken met meerdere figuren tegelijkertijd, maar dat komt later 


aan bod. 
Als we Logo starten zien we na de opdracht ST (Show Turtle) 


een Turtle verschijnen. Deze Turtle zullen we nummer 0 noemen. 
Nu kunnen we met de opdracht: 


TELL I SI 
nog een Turtle oproepen. TELL 1 moet erbij om aan te geven welke 


Turtle we bedoelen. 

Na deze opdracht zien we echter nog steeds maar één Turtle 
(nummer 0). Dat komt omdat de Turtles achter elkaar staan. Toetsen 
we FD 100 in, dan zal Turtle 1 (want dat was de laatst aangesproken 
Turtle) 100 stappen vooruit gaan, en blijft Turtle 0 rustig staan. 


Nu roepen we de andere Turtles: 
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TELL- С SI РО 75 С» КЕЗУ) 


еп 


TELL З ST ЕП 50 (+ КЕТКИМ? 


En daar zijn ze alle vier ... 
Even nog Turtle 0 op gelijke afstand van de anderen zetten: 


TELL О FD 25 C+ RETURNI 


Zo, nu staan ze allemaal op gelijke afstand precies boven elkaar. 
We kunnen echter de Turtles ook gezamenlijk aanspreken, kijk 
maar : 


TELL CO 1 & 34 RT 30 TE ЖОО 


Alle vier de Turtles draaien nu 90° rechtsom en lopen 100 stappen 
vooruit. We hadden ook bijvoorbeeld met TELL L0 1] alleen de 
Turtles 0 en 1 kunnen aanspraken of alle Turtles behalve Turtle 2 
met TELL [0 131. 

Denk hierbij steeds om de vierkante haken [ 1; die zijn alleen nodig 
bij het tegelijk aanspreken van meerdere Turtles. 


Alle Turtles voeren steeds de gegeven opdrachten tegelijk uit. 
Soms is het handiger de Turtles een voor een opdrachten te laten 
uitvoeren. Dat doen we bijvoorbeeld zo: 


TELL CO 1-8 0321. ERON КВК SDD: RT: 9070.507 


In dit geval zullen de opdrachten ВК 200 RT 90 FD 50 door de 
Turtles om de beurt worden uitgevoerd. Dat komt door de opdracht 
EACH. 

EACH wordt in de praktijk veel gebruikt samen met de functie 
WHO. Denk erom, WHO is geen opdracht maar een functie. De waar- 
de van WHO is het cijfer dat correspondeert met de laatst aangespro- 
ken Turtle. Stel, we zijn aan het tekenen en toetsen dan PR WHO 
in. Komt ег op het scherm te staan [0 11 dan weten we dat dit de 
laatst aangesproken Turtles zijn. Kijk maar eens naar de combinaties 
met EACH: 


EACH Е8ЕТХ UHO #25] 
EACH CSETC WHO * 92 
EACH CFD 50 * WHOJ 
EACH CRT 80 % WHOJ 


Bij de laatste regel: EACH [RT 90 * WHO zal dus: 


Turtle 0: 0 graden rechtsom draaien (90 * 0); 
Turtle 1: 90 graden rechtsom draaien (90 * 1); 
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Turtle 2: 180 graden rechtsom draaien (90 * 2); 
Turtle 3: 240 graden rechtsom draaien (90 * 3). 


Zo zijn er veel aardige toepassingen te bedenken. 

Tot slot nog de hulpprocedure USE. De procedure USE is 
gemaakt om de volgende reeks omslachtige handelingen te vermijden. 
Stelt u zich eens voor: 


we werken met vier Turtles tegelijk; 

daarvoor hebben we eerst de opdracht TELL [0 1 2 31 gegeven; 
nu willen we, laten we zeggen, Turtle 1 iets anders laten doen; 
dan moeten we hem eerst aanspreken; 

dat doen we met TELL 1 (gevolgd door de opdrachten die hij 
moet uitvoeren; 

daarna moeten we de overige Turtles weer aanspreken om verder 
te gaan; 

e dus TELL [0 2 3] (gevolgd door hun opdrachten). 


Allemaal ontzettend omslachtig (en in de praktijk komt een situatie 
als deze vaak voor), maar gelukkig is er USE. 

USE kunnen we gebruiken om een Turtle aan te spreken zonder 
daarbij de anderen 'lastig te уаПеп'. We kunnen dan bijvoorbeeld 
zeggen USE 0 [RT 901 zonder de TELL-opdracht steeds te wijzigen. 
Hier is de procedure: 


EDIT "USE :turtle :opdracht 
MAKE “”in.actie WHO 

TELL ыга 

RUN :opdracht 

TELL :in.actie 

ERN ”in.actie 

END 


Opmerking. Het is voor het gebruik handiger om de variabelen 
:turtle, :in.actie en :opdracht af te korten. Voor alle duidelijkheid 
hebben we ze nu laten staan. 


Over de opdracht RUN hadden we het nog niet gehad. Met RUN laten 
we Logo, in een procedure, één of meer opdrachten uitvoeren alsof 
ze direct waren ingetypt. De invoer voor de RUN-opdracht moet in 
de vorm van een lijst gegeven worden. Bijvoorbeeld: 


RUN CFD 50 RT 303 
Opmerking. De invoer voor RUN kan zowel een opdracht als een 
functie zijn. Indien de invoer van RUN een functie is, is de uitvoer 
van RUN gelijk aan die van de gebruikte functie. Bijvoorbeeld: 


de uitvoer van: SUM 10 20 


is gelijk аап de uitvoer van: RUN [SUM 10 201 
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Tot besluit 


Enkele Logo-promitieven betreffende de Turtle Graphies hebben we 
nog niet behandeld. En toch zijn ze niet onbelangrijk. U zult ze in 
veel procedures tegenkomen. Dit zijn er enkele: 


SETPOS Іхсоога. усоога.1 verplaatst de Turtle (al tekenend) naar 
de genoemde positie. 

SETH 240 draait de Turtle rechtsom over het aangegeven aantal 
graden. 


Tenslotte nog enkele tekenprocedures. Deze zorgen voor een aardige 
collectie grafische afbeeldingen. Ze worden gegeven zonder verder 
commentaar. Het advies is: gewoon proberen. 

Het wegschrijven naar cassette-recorder, disk-drive of printer 
gaat met: 


SAVE "С: voor het opslaan op tape 
SAVE "D:filenaam voor het opslaan op disk 
SAVE ТР: voor het afdrukken van de procedures 


Voor het laden gebruiken we LOAD in plaats van SAVE. Hier 
volgen de procedures: 


EDIT ”РОГҮСООМ :ZIJDE : HOEK 

REPEAT 360 / :HOEK ІРУ :4TJDE КІ :НОЕКЈ 
ІР REMAINDER J50 (HOEK =. 70 LSAP) 
POLYGOON :ZIJDE : HOEK 

END 


H 
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TO VERPLAATS :vergroting 

PU ВК :vergroting / 2 LT 30 
FD :vergroting / 2 RT ЗО PD 
END 


TO VIERKANT :stap 
REPEAT Ч CFD :stap RT 802 
END 


TO VEELVIERKANT :stap :vergroting 

ІР "(асар > “150 ГӘТОР CS) 

VIERKANT :stap 

VERPLAATS :vergroting 

VEELVIERKANT :stap + :vergroting :vergroting 
END 


ТО VEELVIERKANTEN :keer 

CS FS SETBG О 

MAKE “stap С RANDOM 25 > + 1 

MAKE "vergroting С RANDOM 20 ) + 1.5 
IF :keer = "О CSS STOP) 

VEELVIERKANT :stap :vergroting 

ERN “stap ERN "vergroting 

PU HOME CS PD 

VEELVIERKANTEN :keer - 1 

END 


TO DUBBELSPIRAAL :teller 

FS CS HOME 

MAKE ”pen1 С RANDOM В ) * С RANDOM 17 2 
MAKE "репе :penl + е 

TELL 0 ST SETPC O :peni SETPN О 

TELL 1 ST SEIX 5 БЕТРС 1 pen БЕТРМ 1 
enk LO 12 PD 

IF steller = "0 [35 STOPJ 

MAKE "stap С RANDOM 10 > + 1 

MAKE "vergroting С RANDOM 5 2 + 1 

MAKE “hoek С RANDOM ЧБ > + 45 


REPEAT БО CFD :stap RT :hoek MAKE “stap :stap + 


DUBBELSPIRAAL :teller - 1 
END 


: vergroting) 
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TO SPIRAAL :teller 

FS CS HOME 

ІН. ;бедіег = 7D [SS STOP 

MAKE ”stap С RANDOM 10 > + 1 

MAKE ”vergroting С RANDOM 5 > + 1 

MAKE ”hoek С RANDOM 46 2 + 45 

REPEAT БО CFD :stap RT :hoek МАКЕ "stap :stap + :vergroting) 
SPIRAAL :teller - 1 

END 


ТО POLYGOONE 

MAKE ”stap С RANDOM 50 ) + 20 

REPEAT 10 CRT 36 REPEAT S CFD :stap КТ 7212 
END 


Hoofdstuk3 - DE ОСО TAALWERELD 
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3.1 Inleiding 


De Logo-taalwereld is een geheel andere wereld, of leeromgeving, 
dan die van de Turtle Graphies. Aan de Logo-taalwereld kunnen we 
zien dat Logo nauw verwant is met talen die gebruikt worden op het 
gebied van kunstmatige intelligentie, zoals bijvoorbeeld LISP en 
Prolog. 

De subtitel van dit hoofdstuk is: het manipuleren met woorden 
en lijsten. Om dit te begrijpen moeten we eerst met elkaar afspreken 
wat we hiermee precies bedoelen. 

Een woord in Logo bestaat uit tekens, net zoals in onze Neder- 
landse taal. Alleen is het begrip WOORD in Logo veel omvangrijker. 
Zo zijn voor Logo TAFEL, STOEL, AANHANGWAGEN of TENTEN- 


TENTOONSTELLING woorden, maar ook 1234, ВОЕМ8, 9%tr2RRR en 
29 


Opmerking. We praten hier over de definitie van het Logo-begrip 
WOORD, en niet over de betekenis van woorden. 


Kortom, een WOORD is een verzameling tekens, al dan niet met 
een uniforme of individuele betekenis. 

Een LIJST (in Logo) is een groep woorden of een groep tekens. 
Een lijst wordt altijd tussen [vierkante haken] geschreven. Dit zijn 
enkele lijsten: 


[KAT HOND KIP] is een lijst die drie elementen bevat; 
[PRINT [Hallo allemaal] ] is een lijst die twee elementen bevat. 


U ziet het: als we twee woorden als één element willen interpreteren, 
moeten deze twee woorden omsloten zijn door []. 

Het bovenstaande is uitermate belangrijk. Zeker wanneer we 
belangrijke informatie in een lijst stoppen. Dit is bijvoorbeeld het 
geval wanneer we een gegevensbestand in Logo gaan maken. Kijk 
maar eens naar deze lijst: 


[[L.C.S.I.Logo] [Turtlelaan 33] [Recursia] [Те1. 0001-98765411 


Deze lijst bevat vier elementen: 
1. de naam 

2. het adres 

3. de woonplaats 

4. het telefoonnummer. 


Door nu te manipuleren met woorden en lijsten kunnen we bijvoor- 
beeld 

- alle namen (eerste elementen) laten zien (of printen); 

- sorteren op naam, adres, woonplaats, etc. 

Kortom, we kunnen allerlei bewerkingen uitvoeren op de gegevens 
die in een gegevensbestand zitten. Later komen we op het gegevens- 
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bestand terug. Het werd ор dit moment genoemd om de begrippen 
WOORD, ELEMENT en LIJST te verduidelijken. 


3.2 Het manipuleren met woorden en lijsten 


In deze paragraaf leren we er weer veel nieuwe woorden bij. Er 
wordt geprobeerd steeds bij ieder woord voorbeelden te geven. Het 
bekendste woord in deze Logo-wereld is: 


PRINT (of PR) 

Toets in: 

PR Hallo 

PR "Hallo 

PR [Hallo Allemaal) 
PR Г”На110 "Allemaal 
РА” 


PR L3 


resultaat 


resultaat 


resultaat 


resultaat 


: I DONT 'T KNOW HOW TO Hallo 
: Hallo 
: Hallo Allemaal 


: "Hallo "Allemaal 


resultaat: 


resultaat: 
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Dit zijn de gewone print-opdrachten. Nu gaan we eens kijken naar 
opdrachten om met woorden en lijsten te manipuleren. 

Toets in: 

PR FIRST “"LOGOBOEK resultaat: L 

PR FIRST CLOGO BOEK) resultaat: LOGO 

PR LAST “LOGOBOEK resultaat: K 

PR LAST (LOGO ВОЕКЈ resultaat: BOEK 


Maar er is meer: 


PR BF “LOGOBOEK resultaat: OGOBOEK 
PR BF (LOGO ВОЕКЈ resultaat: BOEK 
PR BL “LOGOBOEK resultaat: LOGOBOE 
РЕ BL CLOGO BOEK) resultaat: LOGO 


Zoals u waarschijnlijk al hebt begrepen staat BL voor BUTLAST en 
BF voor BUTFIRST. 


BL geeft als resultaat alle tekens of woorden behalve het laatste. 
BF geeft als resultaat alle tekens of woorden behalve het eerste. 


BF, FIRST, BL en LAST kunnen afzonderlijk gebruikt worden, 
maar er zijn ook combinaties mogelijk. Kijk maar eens naar deze 
voorbeelden : 


PR FIRST BF “Computer 
= O 


PR FIRST BF [Logo Taal Computer] 
= Taal 


PR LAST BL “Computer 
= e 


PR LAST BL CLogo Taal Computer] 
= Taal 


Hier zijn heel aardige dingen mee te doen. 

Voordat we straks naar de serieuze taalwereld gaan, laten we 
eerst nog enkele woordgrapjes zien. Kijk eens naar deze procedu- 
res: 
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EDIT ”ERAF1 :WOORD 

IF ЕМРТҮР :WOORD [STOP] 
PR :WOORD 

ERAF] ВЕ :WOORD 

END 


Deze procedure (die een woord als invoer vraagt) heeft het volgen- 
de resultaat: 


PERAF1 “COMPUTER 
COMPUTER 

OMPUTER 

MPUTER 

PUTER 

UTER 

TER 

ER 

R 

Ф 


Aan de achterkant beginnen kan ook: 


EDIT "ERAF2 :WOORD 

IF ЕМРТҮР :WOORD CSTOPJ 
PR :WOORD 

ERAF2 BL :WOORD 

END 


Nu wordt het resultaat: 


PERAF2 “COMPUTER 
COMPUTER 

COMPUTE 

COMPUT 


Dit kan echter ook met zinnen. Dan maken we van de variabele 
:WOORD een lijst. Kijk maar: 
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PERAF2@ [Een computer is op zich een dom apparaat] 
Een computer is op zich een dom apparaat 

Een computer is op zich een dom 

Een computer is op zich een 

Een computer is op zich 

Een computer is op 

Een computer is 

Een computer 


Een 
T 


De opdracht : IF EMPTYP :WOORD [STOP] is weer zo'n testop- 
dracht waar we al eerder over spraken. De opdracht controleert 
iedere keer dat de recursieve procedure doorlopen wordt of de 
variabele :WOORD nog elementen of woorden bevat. Zo niet dan is 
de variabele leeg (EMPTY) en stopt de procedure. 

De volgende procedure lijkt hierop: 


EDIT "ACHTERUIT : INVOER 
IF EMPTYP._: INVOER CSTOPJ 
TYPE LAST : INVOER 

Lë da Sr 

ACHTERUIT BL : INVOER 
END 


En kijk eens naar het resultaat: 


PACHTERUIT "Computer 
EREM em о: 
of: 
PACHTERUIT [Ik lees een boek over Logo 
Logo over boek een lees Ik P 


Let op. In deze procedure is de Logo-opdracht TYPE gebruikt in 
plaats van PRINT om de letters of woorden naast elkaar te laten 
afdrukken. Als we PRINT gebruiken worden alle letters of alle 
woorden niet naast maar onder elkaar afgedrukt. De opdracht TYPE 
zal ook in latere procedures nog veelvuldig worden toegepast. 
Overigens geeft ook ТҮРЕ " een spatie, net zoals PR ". 


Tot nu toe hebben we ons steeds beziggehouden met het uit elkaar 
halen van woorden en lijsten. Er zijn echter ook Logo-opdrachten 
voor het samenvoegen van woorden en lijsten. We zullen ze een voor 
een bekijken. Tevens is bij iedere opdracht een voorbeeldprocedure 
opgenomen. 
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Het gaat om de volgende opdrachten: 


WORD 
LIST 
COUNT 
LPUT 
FPUT 
SE 


WORD 
De Logo-functie WORD voegt twee of meer woorden tezamen: 


PR WORD “Logo "Computer 
LogoComputer 


PR CWORD "Logo "Computer ”Воек) 
LogoComputerBoek 


U ziet dat, wanneer we meer dan twee woorden of elementen willen 
samenvoegen, deze woorden of elementen tussen haakjes gezet moe- 
ten worden. | 

Een voorbeeldje. Sommige mensen hebben de neiging от in hun 
manier van praten nogal vaak het woordje 'ja' te gebruiken. Deze 
eenvoudige procodure doet dat ook: 


EDIT ”PLUSJA :LIJST 

ІР. ЕМРТҮР LIJST Г5ТОР2 
PR WORD FIRST :LIJST "ja 
PLUSJA BF :LIJST 

END 


Kijk maar: 
PLUSJA СІК heb er ook geen verstand van) 
Ikja hebja erja ookja geenja verstandja vanja 
LIST 
De werking van deze Logo-functie lijkt erg veel op die van WORD. 
LIST maakt echter van twee elementen niet een woord, maar een lijst. 


Kijk maar: 


LIST "LOGO "BOEK 
[LOGO BOEK) 
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We zagen al eerder dat er ook lijsten in lijsten bestaan: 


LISIT "LOGO C BUEKJ 
CLOGO CBOEKJJ 


LIST CLOGOJ CLOGO ВОЕКЈ 
CCLOGOJ CLOGO ВОЕКЈЈ 


Ook nu moeten, wanneer we meer dan twee elementen/lijsten willen 
samenvoegen, deze elementen/lijsten tussen haakjes staan: 


(LIST [Naam] [Adres] (Woonplaats) 
ГГМаат2 CAdres) (Woonplaats 


COUNT 


De functie COUNT is gewoon een teller. COUNT telt het aantal ele- 
menten van een lijst of een woord: 


PR COUNT “Logo 
ч 


PR COUNT [Basic [Logo Lispl Prolog] 
3 


Met COUNT kunnen we heel zinvolle dingen doen. Zo kunnen we 
bijvoorbeeld de procedure ITEM maken. In sommige Logo-versies is 
ITEM een Logo-opdracht, maar als hij niet in uw Logo-versie is opge- 
nomen, maakt u hem toch zelf? 


EDIT "1ТЕП :N BERGE 

IF ЕНМРТҰР :OBEB KDP "2 

ІР EN = 1 COP FIRST (DBIEGI 
ОР LIEM ON = T EF REKE 
END 


Zo geeft PR ITEM 2 [Een Logo Computer) : Logo 
en PR ITEM Б “’Logoprocedure £: a 


ITEM vraagt dus om twee invoergegevens: 
1. het hoeveelste teken/element; 
2. van welk woord/welke lijst. 


Een procedure op basis van ITEM die we later veel zullen 
gebruiken en die ook in uw eigen procedures heel zinvol kan zijn is 
KIES. KIES haalt een willekeurig element uit een lijst (of een wille- 
keurig teken uit een woord). 

De (mini)procedure KIES is als volgt: 
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EULI KIES 11791 
PR ITEM (1 + RANDOM COUNT :LIJST) :LIJST 
END 


Let even goed op 1 + RANDOM COUNT. Wanneer een lijst bij- 
voorbeeld zes elementen heeft, dan is de waarde van COUNT 6. 
RANDOM 6 kan echter slechts 0,1,2,3,4,5 als waarde geven. Een 
ITEM 0 staat niet in de lijst en ITEM 6 (het laatste element van de 
lijst) zullen we nooit krijgen. Daarom tellen we bij RANDOM COUNT 
1 op. Het resultaat is een volkomen willekeurig element van een lijst: 


KIES [een twee drie vier vijf) geeft bijvoorbeeld : vier 


Als we de programma's PSYCHIATER en HAIKU.GENERATOR behan- 
delen, zult u zien hoe zinvol deze procedures zijn. 


‚РОТ еп ЕРОТ 


Als we een nieuw element aan een lijst willen toevoegen, kunnen we 
gebruik maken van de opdracht LPUT of ЕРОТ; 

LPUT (Last PUT) zet het nieuwe element achter in de lijst; 

FPUT (First PUT) zet het nieuwe element voor in de lijst: 


PR LIST LPUT “laatst [eerst 
Ceerst laatst] 


PR LIST ЕРОТ “laatst [eerst] 


Claatst eerst] 


SE 


SE (SEntence) wordt gebruikt om woorden, lijsten of een combinatie 
van beide met elkaar te verbinden: 


РК SE ГПІТ ZIJNICTWEE LIJSTEN) 
DIT ZIJN TWEE LIJSTEN 


РЕ SE ”ТШЕЕ "WOORDEN 
TWEE WOORDEN 


In de praktijk maken we vaak gebruik van de opdracht SE om woor- 
den of zinnen te verbinden met variabelen: 


MAKE "NAAM [Henk Jan РЕ SE [Hoe gaat het ermee 1 :NAAM 
Hoe gaat het ermee Henk Jan 


of: 
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MAKE "LEEFTIJD 30 PR CSE [Ben jij all :LEEFTIJD ”Чааг ”?) 
Ben jij al 30 jaar ? 


Ook nu zien we weer dat, wanneer SE een invoer heeft van meer 
dan twee woorden (of lijsten), we haakjes moeten gebruiken. (In dit 
geval kunnen we volstaan met één stel.) 


Voordat we de opdrachten WORD, LIST, COUNT, LPUT, FPUT en 
SE aan de hand van enkele programma's nader gaan bekijken, eerst 
nog even aandacht voor het volgende. 

We zijn al verschillende malen in procedures zogenaamde testop- 
drachten tegengekomen, bijvoorbeeld een testopdracht die kijkt of 
een lijst nog niet 'leeg' is. Logo heeft verschillende woorden die in 
testopdrachten goed te gebruiken zijn. Deze woorden, Logo-functies 
genoemd, zijn geen opdrachten; ze kijken alleen of iets waar of 
onwaar is. De waarde van deze woorden is steeds: TRUE of FALSE. 
Aan deze waarde kunnen we binnen de testopdracht echter wel een 
handeling verbinden. Kijk maar: 


IF EHPTYP LL 


Nu zal EMPTYP kijken of de variabele :LIJST al leeg is. De waarde 
van EMPTYP zal: 

- als de lijst NIET leeg is FALSE zijn; 

- als de lijst WEL leeg is TRUE zijn. 

En als de waarde van EMPTYP TRUE is, wordt de opdracht [STOP] 
uitgevoerd. 


3.3 Het maken van testopdrachten en de te gebruiken 
Logo-functies 


We zagen al hoe we EMPTYP konden gebruiken in een testopdracht. 
Er zijn echter nog meer Logo-woorden. Elk van deze woorden kijkt 
naar een ander aspect van de invoer. Hieronder staan enkele van 
deze Logo-woorden; u zult ze later in de verschillende procedures 
nog regelmatig tegenkomen: 


NAMEP 
WORDP 
NUMBERP 
LISTP 
MEMBERP 
EQUALP 


Nu volgen enkele voorbeelden van het gebruik van deze woorden. 
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e NAMEP kijkt of een variabele wel een waarde heeft. Een voorbeeld: 


PR NAMEP "LIJST 
FALSE 


MAKE “LIJST [Dit is een lijst) РЕ NAMEP "LIJST 
TRUE 


In het eerste geval heeft de variabele :LIJST geen tekstwaarde (en 
daarom heeft de functie NAMEP de waarde False). Daarna hebben 
we :LIJST de waarde [Dit is een lijst] gegeven. 

In een testopdracht gebruiken we NAMEP als volgt: 


IF NAMEP :LIJST CPR [Deze variabele heeft een waarde 
CPR [Geen waarde) 


Hier zien we dat, indien de waarde van NAMEP TRUE is, de eerste 
opdracht wordt uitgevoerd. Indien de waarde van NAMEP FALSE is, 
wordt de tweede opdracht uitgevoerd. 


e WORDP kijkt of hetgeen ingevoerd is wel een woord is. Bijvoor- 
beeld: 


РЕ WORDP ”АВСОЕЕС' 
TRUE 


PR WORDP [LijstJ 
FALSE 


In het eerste geval valt ABCDEFG volgens de normen van Logo 
inderdaad onder de definitie van woord. [Lijst] echter is niet een 
woord maar een lijst met één element. 

Ook WORDP kunnen we gebruiken in een testopdracht: 


IF WORDP :LIJST CPR [Dit із een woord) 
CPR [Dit is geen woord) 


ө NUMBERP kijkt of de invoer misschien een getal is. Bijvoorbeeld: 


PR NUMBERP 7 
TRUE 


PR NUMBERP (92 
FALSE 


Of als testopdracht: 


IF NUMBERP :GETAL CHAKE “GETAL :GETAL + 11 
CPR [Dit is geen getal) 
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ө LISTP kijkt of de invoer wellicht een lijst is. Bijvoorbeeld: 


PR LISEP “НЕШО 
FALSE 


PR:GISIP CHALLOJ 
TRUE 


En ook in testopdrachten kan LISTP gebruikt worden: 


IF LISIP :GROET:EPR- COUNT :БРОЕТЈ 
CPR CDit is geen lijst] 


Van een iets ander kaliber, maar ook zeer bruikbaar is МЕМВЕКР. 


e MEMBERP is een zeer interessante Logo-functie, die twee invoer- 
gegevens vraagt: 
1. een getal, letter, woord of lijst; 
2. een lijst. 
MEMBERP kijkt of het eerste invoergegeven een element van het 
tweede invoergegeven is. Bijvoorbeeld: 


PR MEMBERP A CA BC D EJ 
TRUE 


PK МЕМВЕРР Соп B LT D EJ 
FALSE 


Om de betekenis van MEMBERP te illustreren laten we de vol- 
gende mini-procedure zien. Deze procedure KLINKER kijkt of een 
woord met een klinker begint en maakt daarbij gebruik van 
МЕМВЕКР: 


EDIT ”KLINKER :WOORD, 
OUTPUT MEMBERP FIRST :WOORD CA E I D UJ 
END 


e EQUALP tenslotte is een vergelijkingsfunctie en wordt gebruikt 
bij letters, getallen, woorden en lijsten, bijvoorbeeld: 


PR EBUALP 150 50 *- 3 
TRUE 


PR ERUALP ” CJ 
FALSE 
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Let ор!! Een leeg woord " is NIET hetzelfde als een lege lijst [ ]. 


EQUALP kunnen we bijvoorbeeld gebruiken om te zien waar een ele- 
ment zich bevindt in een lijst: 


EDIT "WAARP :ELEMENT :LIJST 

LE EPPTYP' ҮБІМЗІ СООТРЫТ O) 

IF EQUALP :ELEMENT LAST :LIJST COUTPUT COUNT :LIJSTJ 
OUTPUT WAAR? :ELEMENT BUTLAST :LIJST 

END 


Kijk maar: 


ГЕ "29 VS B Z;:9' 5ч 3.8 12 
7 


PR WAAR? "п "computerboeken 
14 


Nog enkele bijzondere testopdrachten, die we aan de hand van een 
aantal voorbeelden zullen verduidelijken: 


e AND 
EDIT STEEL <W 
IF AND FIRST :U = ”A LAST :U = "A CPR [Dit woord 
begint en eindigt met een AllVolgende woord ..1 
END 


Kijk maar: 


TEST1 "ACHTERNA 
Dit woord begint en eindigt met een A 


TEST1 “Achterna 
Volgende woord 


Hier wordt de eerste printopdracht 
Dit woord begint en eindigt met een A 


pas uitgevoerd als aan beide voorwaarden is voldaan. De voorwaar- 
den zijn: 


- de eerste letter van het in te voeren woord moet een A zijn; 
- de laatste letter van het in te voeren woord moet een A zijn. 


Wordt aan slechts één van beide voorwaarden voldaan (of aan geen 
van beide), dan volgt de laatste printopdracht: 
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Volgende woord 
Het spreekt voor zich dat er vele soorten voorwaarden mogelijk zijn. 
De procedure TEST1 is slechts een voorbeeld voor het gebruiken 
van AND. 
e OR 
EDIT "TESI ый 
IF ОК FIRST :Ш = "A FIRST :Ш w "а CPR LDit woord begint 
met de eerste letter van het alfabetJ[Volgende woord ..1 
END 


Kijk maar: 


TESTe ”andersom 
Dit woord begint met de eerste letter van het alfabet 


TESTe ”doorelkaar 
Volgende woord 


In dit voorbeeld zien we OR staan. Dit betekent dat er gekeken 
wordt of aan een van beide voorwaarden wordt voldaan. Is dit het 
geval dan wordt de eerste printopdracht uitgevoerd: 

Dit woord begint met de eerste letter van het alfabet 


De voorwaarden zijn: 


- de eerste letter уап het woord moet een А zijn; 
- de eerste letter van het woord moet een a zijn. 


Wordt aan geen van beide voorwaarden voldaan, dan verschijnt: 
Volgende woord 
Ook voor OR is een veelheid aan toepassingen te bedenken. De 
voorwaarden kunnen we steeds nader bepalen. 
ө NOT 
BONT "EE 3 IN 
IF МОТ NUMBERP :N CPR [Dit is geen getal !JCPR [Dit 
is een getal 


END 


Deze testopdracht draait de zaken om. Er staat eigenlijk: 
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Als :N GEEN getal is, voer dan de eerste opdracht uit. 
Als :N WEL een getal is, voer dan de laatste opdracht uit. 


Als we NUMBERP in de testopdracht een 'voòrwaarde' noemen, dan 


- geeft NOT de waarde TRUE als de voorwaarde FALSE is; 
- geeft NOT de waarde FALSE als de voorwaarde TRUE is. 


Kijk maar: 


ТЕБІЗ ЧО 
Dit is een getal 


TEST3 "Hallo 
Dit is geen getal ! 


3.4 De Haiku.Generator 


Genoeg theorie, we gaan nu eens kijken naar een heel aardig pro- 
gramma, dat het bovenstaande op uitstekende wijze illustreert. 
Eerst volgt de listing van het programma en daarna de uitleg. 

En dan nu het programma: HAIKU.GENERATOR. Deze ргосе- 
dure maakt van de ingevoerde woorden steeds een ander gedicht: 
een haiku, ofwel een kort Japans gedichtje. Hier is de listing: 


ТО H.G :HOEVAAKT? 

IF :HOEVAAKP < ”1 CSTOPJ 

IS CT 

MAKE ”А Cochtend morgen dag avond nacht] 

MAKE ”B Cgloort vervaagt verdwijnt ontwa 

акі] 

МАКЕ ”Г [nevel mist regen lichtkransJ 

MAKE ”П [veegt maakt vliegt lacht huilt 

veronderstelt zwaait) 

MAKE "E Cbloem vlieg vlinder vlieger) 

MAKE ”F Clucht wolken hemel horizon] 

MAKE "DG Copen schoon droog toe] 

SETBG 56 + RANDOM 14 

SETCURSOR ГР 8J РР С SE “De KIES :A KIES 
:B 

SETCURSOR ГО 102 PR С SE "en "in "дв KIE 

Bet 

SETCURSOR ГР 121 РЕ С SE KIES 0 "een KI 

ES JE "de KIES :F KIES :G 

WAIT 200 

H.G :HOEVAAKP — 1 

END 
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1090 KIES ab? 

OP ITEM 1 + С RANDOM COUNT :LIJST > :11Ј 
Chr 

END 


TO ITEM ¿N ^гОВИЕГЕ 

FF ЕГРТҮР:: ОВЈЕШ АТОР "0 

ІК М" ІСТОР ГІКШЕ- OBR J 
ОР. EIER EN =. 1 Ж Т RUE 
END 
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Dit zijn enkele voorbeeldjes van met de Haiku.Generator gemaakte 
haiku's: 


De morgen verdwijnt 
en in de lichtkrans 
lacht een vlieger de lucht toe 


De avond verdwijnt 
en in de mist 
maakt een bloem de hemel schoon 


De morgen ontwaakt 
en in de nevel 
naakt een vlieger de lucht schoon 


De morgen verdwijnt 
en in de mist 
veronderstelt een vlinder de hemel droog 


De avond ontwaakt 
en in de nevel 
vliegt een vlieg de wolken open 


De dag ontwaakt 
en in de lichtkrans 
maakt een vlieger de lucht schoon 


De ochtend gloort 
en in de mist 
huilt een vlieger de hemel toe 


С ПЕРА 70% 


De dag vervaagt 
en іп de lichtkrans 
veronderstelt een vlieger de wolken droog 


De nacht ontwaakt 
en in de nevel 
huilt een vlinder de wolken schoon 


De avond gloort 
en іп de mist 
veegt een bloem de horizon droog 


De morgen verdwijnt 
en in de lichtkrans 
vliegt een vlieger de horizon open 


De sorgen ontwaakt 
en in de regen 
huilt een vlieg de hemel schoon 


# m dr яи 4% ТАИ Я 
%% AWV И ИР Ж “% ик 


Er 
A4 25 


TH T] 
ul: d z; ИДА 
HUE 
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m E 


JAMI 4! 
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Uitleg van de Haiku Generator 


Zoals u ziet bestaat het programma Haiku Generator uit drie proce- 
dures: 

- de hoofdprocedure H.G (HAIKU.GENERATOR is zo'n lange naam); 
- de subprocedure ITEM en 

- de subprocedure KIES. 

De procedures ITEM en KIES zijn op p.52 reeds besproken. 

Om te beginnen vraagt deze procedure om een invoergegeven. 
De variabele :HOEVAAK? krijgt de waarde van dit invoergegeven. 
Doordat de waarde van :HOEVAAK? telkens, aan het eind van de 
procedure, met 1 wordt verminderd, fungeert :HOEVAAK? als een 
teller. H.G 10 betekent dus dat de procedure H.G tien maal wordt 
doorlopen. 

H.G begint met een testopdracht, die de waarde van 
:НОЕУААК? bekijkt. Is deze waarde lager dan 1, dan stopt де pro- 
cedure. 

Vervolgens worden twee schermopdrachten gegeven: TS en CT. 
TS dient om aan te geven dat we gebruik maken van het Text 
Screen. Het gehele scherm wordt dan gebruikt voor tekst. CT dient 
om het scherm schoon te maken met Clear Text. 

Hierna wordt аап de variabelen A. :B, :C, :D, :E, :F en :G 
een waarde toegekend. Deze waarde bestaat uit een lijst met vier, 
vijf of zeven elementen. Indien u wilt experimenteren kunt u de 
elementen in deze lijsten rustig aanpassen of veranderen. 

SETBG 56 + RANDOM 14 is wederom een opdracht voor het 
beeldscherm. Hiermee bepalen we de kleur van het beeldscherm op 
RANDOM-wijze. 


Nu volgen de eigenlijke hoofdregels van de procedure. Na de 
SETCURSOR-opdracht volgt: 


PR (SE "De KIES :A KIES :B 


Deze PRINT-opdracht heeft tot gevolg dat 

- eerst het woord De wordt afgedrukt; 

(Opmerking. Vergeet niet om met " aan te geven dat het om een 
woord gaat.) 

- daarna de procedure KIES wordt aangeroepen met als invoer :A. 
Omdat :A de waarde [ochtend morgen dag avond nacht] heeft, 
zal een van deze woorden worden gekozen. 

- tenslotte op dezelfde manier uit de variabele :B een woord wordt 
gekozen. 

Vervolgens komen de variabelen :С, :D, :E, :F еп :G aan de beurt. 

De, van tevoren bepaalde, voorzetsels, lid- en voegwoorden worden 

aan de RANDOM-woorden 'geplakt' met de instructie SE. Let er wel 

op dat aan SE een ( moet voorafgaan. 


De procedure besluit met een wacht-opdracht van 200 eenheden: 
WAIT 200. Als ‘eenheid! wordt іп LCSI Logo 1/60 seconde gebruikt. 
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Tenslotte wordt de, recursieve, procedure opnieuw aangeroepen en 
wordt de waarde van :HOEVAAK? met 1 verminderd. 


3.5 Invoeropdrachten met Read Character en Read List 


In veel taalprocedures zult u de opdrachten RC en RL tegenkomen. 
Dit is ook het geval in de procedures TEGENSTELLING, PSYCHIA- 
TER en de databases LOGOMEMO en LOGOMANAGER. Maar voordat 
we naar deze procedures gaan kijken, richten we onze aandacht 
eerst op de opdrachten 


RC = Read Character 
RL = Read List. 


Deze opdrachten werden reeds invoeropdrachten genoemd. Dit bete- 
kent dat beide pas geactiveerd worden wanneer er iets wordt inge- 
voerd. Deze invoer is 

- bij RC een teken 

- bij RL een lijst (met een of meer elementen). 


Eerst gaan we eens naar de opdracht RC kijken. 


De opdracht RC (Read Character) 
Ter illustratie dit voorbeeld: 


EDIT ”SOMMEN 

MAKE ”GETAL1 RANDOM 5 

MAKE ”GETAL2 RANDOM 5 

MAKE ”5ОМ :GETAL1 + :GETALe 

PR [Hier komt een som :2 

PR Li 

ТҮРЕ (BE :GETALY "+ :БЕТА е "е ” 

MAKE “OPLOSSING RC 

ТҮРЕ :OPLOSSING 

DREI 

ТЕ EQVALP :OPLOSSING :50М CPR [Okee !JICPR ГЕси+22 
PR [Wil je doorgaan J / М PJ 

MAKE "KEUS RC 

IF :KEUS = ”J [PR [Okee dan gaan we verder) SOMMENJCPR 
[Dan stoppen ue] 

END 


In deze procedure wordt eerst de uitkomst van een som gevraagd. 
Met de opdracht RC wordt het antwoord toegekend aan de variabele 
OPLOSSING: 


MAKE “OPLOSSING RC 
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Hier 'wacht' de procedure tot er iets wordt ingevoerd. 

Nadat het teken is ingevoerd, wordt het vergeleken met de 
waarde van de variabele :SOM. En als gekeken is of het gegeven 
antwoord klopte, wordt de vraag gesteld: 


Wil je doorgaan J / NP 
Ook hier wacht de procedure op invoer. Dat komt door: 
MAKE ”KEUS RC 


Er wordt dus een variabele :KEUS gemaakt die de waarde krijgt van 
de toets die wordt ingedrukt. Wordt de 'J' ingedrukt, dan zorgt RC 
ervoor, dat de variabele :KEUS de waarde J krijgt. Wordt er echter 
op bijvoorbeeld de * gedrukt, dan zal :KEUS de waarde * ontvan- 
gen. En als :KEUS een andere waarde dan J krijgt, zal de tweede 
printopdracht worden uitgevoerd. 

Op het moment dat aan de variabele :KEUS een waarde is toege- 
kend, dus op het moment dat er een toets wordt ingedrukt, zal de 
procedure verder gaan met de [F-opdracht. 

Is de waarde van :KEUS gelijk aan "J (denk om de aanhalings- 
tekens, anders denkt Logo dat J de naam van een procedure is), 
dan zal de eerste opdracht worden uitgevoerd. Deze opdracht drukt 
de zin 


Okee dan gaan we verder 
af. Is echter de waarde van :KEUS ongelijk aan J (het maakt geen 
verschil of dat N is of een andere toets), dan zal de tweede opdracht 
worden uitgevoerd. 
Opmerking. De tweede printopdracht wordt dus uitgevoerd bij 
iedere waarde van :KEUS, behalve bij J. In plaats van de N mag 
dus gerust een andere toets worden ingedrukt. 
Nog een voorbeeld: 

PR CAls je wilt stoppen Toets RETURN 

MAKE ”KEUS RC | 

IF :KEUS = CHAR 155 [STOP] CPR [We gaan verder) 
Een teken kan dus ook aangeduid worden met zijn ASCII-codenum- 
mer, in dit geval 155. 


De opdracht RL (Read List) 


Nu kijken we eens naar het volgende programmafragment: 


бо 


PR [Hallo , hoe is je naam zi 

MAKE “NAAM RL 

PR С SE [Leuk dat je hier bent] :NAAM 

PR [Sorry dat ik zo nieuwsgierig ben, Ј 

PR [maar , waar woon је: "zi 

MAKE “WOONPLAATS RL 

IF :WOONPLAATS = CDokkum) CPR ГПааг kom ik vaak) 
PR С SE [Dus] :NAAM ”woont "in :WOONPLAATS 


U ziet het, RL kent aan de variabele :NAAM de waarde van een in 
te toetsen naam toe en :WOONPLAATS krijgt de waarde van een vol- 
gende ingetoetste naam. Het resultaat van het bovenstaande kan 
dus zijn: 


Hallo , hoe is је naam ? 

Auke Sikma 

Leuk dat je hier bent Auke Sikma 
Sorry dat ik zo nieuwsgierig ben, 
maar , waar woon je 7 

Rinsumageest 

Dus Auke Sikma woont in Rinsumageest 


Zo kunnen zowel RC als RL zeer zinvol zijn in procedures. 


3.6 De tegenstelling 
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Een voorbeeld van een zinvol gebruik van de opdrachten RC en RL 
vindt u in de procedure TEGENSTELLING. Deze procedure, die 
beschikt over een uitgebreide woordenschat, kan een zin, een ver- 
haal zo u wilt, volledig herschrijven. Maar dan in het TEGENOVER- 
GESTLEDE! Alles wat dik was wordt dun, alles wat arm was wordt 
rijk, enzovoort. 

Om een zin te kunnen herschrijven zijn de opdrachten RL, 
FIRST, LAST, BF en FPUT heel belangrijk. 

Bekijkt u een en ander maar eens rustig. 


TO VERGELIJK :regel :woorden 

IF EMPTYP :woorden COP :гепв112 

IF regel = FIRST FIRST :woorden COP LAST FIRST :w 
oorden) COP VERGELIJK :regel BF :woorden) 

END 


TO N.ZIN :regel :woorden 

IF ЕНРТҮР : гацах COF L19 | 

OP ЕРОТ С VERGELIJK FIRST :regel :woorden 2 С М.21 
МС ВЕ :regel ? :woorden 2 

END 


TO TEGENSTELLING 

19 СІ - ЗЕТЕЗ 0 

MAKE “woorden ([slimme domme) (domme slimme] Coude 
nieuwe] [nieuwe oudel (jonge oude] Coude jonge L 

blije verdrietigel [verdrietige Ь1і јеЈ [tamme wild 
eJ [wilde tamme) [grote kleine) (kleine grotel [du 

re goedkope) [goedkope dure) (domme intelligente 
[intelligente dommel [hoge lagel [lage hogel [veel 
weinig) [weinig veel) Carme rijke [rijke armel L 
atari commodore) (commodore atari] Ckat hond) [Chon 

а кај [schone vieze] [vieze schone) [volle lege) 


[lege vollel [gewone andere) Candere gewone [lang 

е korte) [korte langel (koffie theel [thee koffie) 
Cknappe lelijkel [lelijke knappel (dikke dunne) ГС 

dunne dikke) [goede slechte) [slechte goede [vrie 

ndelijke boze) (boze vriendelijkel [lichte zware) 

[zware lichte] 

PR [Welke zin moet ik herschrijven 72 

MAKE “regel RL 

PR N.ZIN :regel :woorden 

WAIT 500 

TEGENSTELLING 

END 
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Zoals u in de subprocedure VERGELIJK kunt zien, wordt een zin 

woord voor woord bekeken. 

1. Er wordt gekeken of het eerste woord van :REGEL (de ingetoet- 
ste zin) overeenkomt met het eerste element van het eerste ele- 
ment in :WOORD. Dit gebeurt door: | 
IF :REGEL = FIRST FIRST :WOORD 
Als dit het geval is, wordt dit woord vervangen door het laatste 
element van het eerste element, als volgt: 

OP LAST FIRST :WOORD 
Met andere woorden: als de ingetoetste zin begint met Slimme, 
wordt dit vervangen door Domme. 

2. Komt het eerste woord van :REGEL niet overeen met het eerste 
van het eerste element van :WOORD, dan wordt het eerste ele- 
ment van :WOORD terzijde gelegd met 
OP VERGELIJK :REGEL BF :WOORD 
Hierna wordt het eerste woord van :REGEL vergeleken met het 
eerste element van het tweede element van :WOORD. Enzovoort. 

3. Zo wordt ieder woord van de ingetoetste zin vergeleken met het 
eerste element van alle elementen van :WOORD en zo mogelijk 
vervangen door het tweede element van dat element. 

4. Uiteindelijk wordt de gehele zin als het ware herschreven. Bij- 
voorbeeld: 

- De grote intelligente schrijver kocht een dure maar prima printer. 

- De kleine domme schrijver kocht een goedkope maar slechte printer. 

Of: 

- De dikke maar tamme kater was verliefd op de korte knappe poes. 

- De dunne maar wilde kater was verliefd op de lange lelijke poes. 


Op dezelfde manier is natuurlijk ook een procedure SYNONIEMEN te 
maken. Dan zou een woord niet worden vervangen door het tegen- 
overgestelde maar door een ander woord met ongeveer dezelfde 
betekenis. Een lijst zou er dan zo uit kunnen zien: 


MAKE "SYNONIEMEN [[ verdrietige droevige] [kleine 
minuscule] [grote reusachtige], enzovoort ..... 


In wezen verandert de procedure niet, alleen zou de variabele 
:WOORD vervangen moeten worden door een andere variabele. Of 
de variabele :WOORD zou een andere waarde moeten krijgen. 
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3.7 De Logo-psychiater 
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Een fantastisch programma, vinden velen, is PSYCHIATER. Dit pro- 

gramma simuleert een gesprek tussen u (als patiënt) en een psy- 

chiater. Het programma is niet alleen leuk om te doen, maar ook om 

te onderzoeken, om mee te experimenteren, als u dat wilt. Woorden, 

zinnen, antwoorden en rake opmerkingen toevoegen, u ziet maar. 
Hier is onze Logo Psychiater. 
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TO PSYCHIATER 
+ tet: ЅЕТВОГ О 
MAKE “COMMENTAAR IIIe denkt ,1 [Je усв1%,1 [Je zeg 
t ,J ГІК denk ‚1 СІК weet ,1 CIk veronderstel ‚1 C 
Je vertelt mel [Je zegt mel [Je wilt me doen gelov 
en] (Zonder blikken of blozen vertel je mij) CJe u 
ilt zeggen) [Hoor ік dat goed ...1 [Denk je echt 
А 
MAKE "ZIN [[Ja,ja,ga verder...) CNiet bang zijn,ze 
g het тааг..1 [Daar hebben veel mensen last мап] Г 
20,20..1 CKijk eens aan...) [Je meent het...) [Cis 
dat echt waar PJ COngelovelijk...1 CIk heb veel me 
egemaakt , maar dit ...1 [Dat kun jij makkelijk ze 
ggen...J (Daar hebben we het nu niet оуег..1 [Dat 
heeft er niets mee te maken ..1 [Ja luister eens Š 
als je zo begint ..1 (Daar zou je toch eens wat aa 
п moeten doen) [En wat Кап ік daaraan doen PJ [Vin 
d je dat leuk om te vertellen] ГПааг schiet ik nie 
ts mee op natuurlijk) (Wat is dat nou voor een onz 
in ?1 [Niet er omheen draaien) [De waarheid graag 
‚..1 СІК heb een iemand gekend die had dat соКк11 
MAKE “DRAAIOM ГГиш mijn) Cvraag vraagt) Ckunt kan] 
LIK jel [mij 1041 Cjou mijd Cu ik) Cik ui [geef g 
eeft] [mijn jouw) Cben bent) Сте jeJ [je ik) Cvoel 
voelt) [jouw mijn) Ckan kunt) Cdenk denkt Cheb h 
ebt] [zie ziet) [slaap slaapt] Clocp loopt) [fiets 
Fietst] [droom droomt] [geloof gelooft) Cveronder 
stel veronderstelt) Cbeweer beweert) Choor hoort] 
PR [Daag ‚hoe heet je PJ 
MAKE "Moon RL 
PR SE [Wat scheelt eraan) :NAAM 
COMMUNICEREN 
END 


TO COMMUNICEREN 

MAKE “INVOER RL 

IF :INVOER = [tot ziens) CPR [Kom nog maar eens la 
ngs] STOP] 

MAKE ”Х .ЕХАМІМЕ 53770 

Ir cA и 100 ГЕК KIES :ZINJ 

IF :X < 101 CANTWOORD : INVOERJ 

COMMUNICEREN 

END 


АН: KIES 251451 
P. LTEN Lite RANDON COUNT =: LIJST 2 :LIJST 
END 
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TO ANTWOORD : INVOER 

PR С SE С KIES :COMMENTAAR 2 С VERANDER : INVOER :D 
RAAIOM 

END 


TQ: LIEN МЕР 

Fo EPP ST CPN Eeke ПОРТ) 

IF. rN m. „ГОК КОШОК et ORR Ј 
ОР: TTEM N zc ša BF. «ОВЈЕСТ 
END 


ТО VERGELIJK : INVOER :DRAAIOM 

IF ЕМРТҮР :DRAAIOM COP : INVOER] 

IF- : INVOER =: FIRST FIRST <DRAATON COP LAST: FIRST 
ПКААІОМЈ COP VERGELIJK : INVOER BF :DRAAIOMJ 

END 


ТО VERANDER : INVOER :DRAAIOM 

IF ЕМРТҮР : INVOER COP C99 

OP FPUT С VERGELIJK FIRST : INVOER :DRAAIOM 2 С VER 
ANDER С BF :INVOER > :DRAAIOM 2 

END 


Uitleg van het programma PSYCHIATER 
Wat gebeurt er wanneer we de procedure PSYCHIATER starten? 


1. Na enige schermopdrachten (TS CT en het bepalen van de beeld- 
schermkleur) worden de variabelen 'gevuld'. De variabelen 
:COMMENTAAR, :ZIN en :DRAAIOM krijgen hier hun waarde. 
Elk van deze variabelen bestaat nu uit een lijst met meerdere 
elementen. 

2. Hierna wordt de openingszin op het scherm gezet: Daag, hoe 
heet je ? Het antwoord op deze vraag wordt aan de variabele 
:NAAM toegekend, en het programma vervolgt met de zin: 

Wat scheelt eraan ... (gevolgd door de inhoud van de variabele 
:ХААМ). 

3. Ор het moment dat de procedure COMMUNICEREN wordt aange- 
roepen begint het eigenlijke deel van het programma, het hoofd- 
programma. 

4. COMMUNICEREN is een recursieve procedure die steeds, door 
RL, de ingetypte zin als uitgangspunt neemt. Deze ingetypte zin 
is in het programma de variabele :INVOER. Wanneer "tot ziens" 
wordt ingetypt, stopt de procedure en zegt de Logo-Psychiater: 
Kom nog maar eens langs. 

5. Vervolgens wordt, binnen COMMUNICEREN, op RANDOM-wijze 
de waarde van :X bepaald. Dit gebeurt hier niet met de opdracht 
RANDOM, maar met het uitlezen (opdracht .EXAMINE) van adres 
93770. Adres 53770 is (voor Atari 8-bits computers) het adres 
waar zich de toevalsgetallen bevinden. Indien u met een andere 
Logo-versie werkt, gebruik dan het juiste adres voor uw compu- 
ter. 


6. 
f 
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Door МАКЕ "X .EXAMINE 53700 wordt aan de variabele :X een 
waarde toegekend tussen 0 en 255. Is dit cijfer lager dan 101 dan 
treedt de procedure ANTWOORD in werking en wordt de ingetyp- 
te zin veranderd en aangepast. Is de waarde van :X groter dan 
100, dan kiest de Psychiater een zin. Dit zijn steeds zinnen die 
niets te maken hebben met wat er gezegd is, maar juist daardoor 
kan dit wel een komisch effect hebben. Kijk maar eens naar het 
voorbeeld van een PSYCHIATER-dialoog op deze en de volgende 
bladzijde. 

Wanneer de voor :X bepaalde waarde kleiner is dan 101 treden de 
procedures ANTWOORD, VERGELIJK en VERANDER in werking. 
De procedure ANTWOORD, met de ingetypte zin als uitgangs- 
punt, zorgt via KIES :COMMENTAAR eerst voor een aardige ope- 
ning van de zin. Hierna wordt door VERANDER en VERGELIJK 
de hele zin doorgelicht en op dezelfde manier behandeld als in de 
procedures bij TEGENSTELLING. 

Treft VERGELIJK in de ingetypte zin een woord aan dat over- 
eenkomt met het eerste element van een der elementen van 
:DRAAIOM, dan wordt dat woord veranderd in het tweede ele- 
ment van dat element. Met andere woorden: treft VERGELIJK het 
woord "kunt aan іп de ingetypte zin, dan wordt dit ogenblikke- 
lijk veranderd in "kan; je verandert in ik, mij in jou, enzovoort. 
Op deze manier wordt de hele zin bekeken en waar nodig veran- 
derd. 

Kunt u zich voorstellen dat, wanneer de verzameling woorden 
maar groot genoeg is, er een goed gesprek mee te voeren is? 


. Tenslotte wordt de procedure COMMUNICEREN opnieuw geacti- 


veerd. Dit gaat net zo lang door totdat u "tot ziens" intypt. 


Hierna volgt een voorbeeld van een dialoog met de Logo-Psychiater. 
Veel plezier ermee! 


?PSYCHIATER 

Daag ‚hoe heet je ? 

Auke Sikma 

Wat scheelt eraan Auke Sikma 

ik heb hoofdpijn 

Je voelt, je hebt hoofdpijn 

ik denk dat ik het te druk heb 

Wat is dat nou voor een onzin ? 

ik ben namelijk een boek aan het schrijven 
Is dat echt waar ? 

ja , een beek over Logo 

Hiet bang zijn, zeg het maar.. 

ik denk dat ik ae te druk maak 

Paar hebben we het nu niet over.. 

nee ‚ maar dat is wel mijn probleem 

Dat heeft er niets mee te maken .. 

dat heeft er verdorie alles mee te maken — 
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Ja luister eens ‚als je zo begint ., 

kunt u mij helpen 

Niet er omheen draaien 

ik vraag u iets 

Je zegt me je vraagt ik iets 

wat praat u raar dokter 

Dat heeft er niets mee te maken … 

dat is waar 

Ik denk , dat is waar 

er is nog iets ,.., 

De waarheid graag ... 

ik droom nogal vreemd de laatste tijd 

Je denkt , je droomt nogal vreemd de laatste tijd 
ik droom over slechte recensies 

Ja luister eens ‚als je zo begint … 

daar ben ik bang voor dokter 

Je zegt me daar bent je bang voor dokter 

nu heeft u dat weer , dat vreemde gepraat 
Vind je dat leuk om te vertellen 

nou nee , maar het valt wel op 

Dat kun jij makkelijk zeggen... 

ja ‚ want ik heb u gemaakt 

Dat heeft er niets mee te maken ,. 

0, nee ?? 

Je meent het... 

ik voel me onzeker 

Daar schiet ik niets mee op natuurlijk 

kunt u aij helpen ? 

Niet er omheen draaien 

ik wil graag rustig slapen 

Je zegt me je wil graag rustig slapen 

ja ‚ en niet meer zo raar dromen 

Ik denk , ja , en niet meer zo raar dromen 
dat is wat ik wil 

Je wilt zeggen dat is wat je wil 

ik zie dat u mij niet helpt 

Je vertelt де je ziet dat ik jou niet helpt 
uw Nederlands is niet om over naar huis te schrijven 
Hoor ik dat goed ... aijn Nederlands is niet om over naar huis te schrijven 
ja , dat zei ik 

En wat kan ik daaraan doen ? 

niets , dat is aijn schuld 

En wat kan ik daaraan doen ? 

ik denk dat ik maar eens ga 

Hoor ik dat goed ... je denkt dat je maar eens да 
0,0,0,0,0 

Ja luister eens ‚als је zo begint … 

tot ziens 

Кой nog maar eens langs 
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3.8 Logo en databases 


Logo is wellicht niet de meest logische keus voor het maken van een 
database (een elektronische kaartenbak), maar toch kan het heel 
erg leerzaam zijn hier even bij 51.1 te staan. 


Allereerst het programma "LOGOMEMO. LOGOMEMO is een zeer een- 
voudige programma met verschillende opties: 


Het schrijven van een memo. 
Het lezen van een memo. 

Een overzicht van alle memo's. 
Het afdrukken van een memo. 
Het wissen van een memo. 

Het laden van een memo. 

Het opslaan van een memo. 


чо Qn i> мн 


LOGOMEMO is gebaseerd op het gebruik van een disk-drive. Data- 
bases die met bandjes werken zijn te traag en daardoor onhandig in 
het gebruik. 

LOGOMEMO is een database-programma dat ieder bestand (ieder 
memo, ieder gegeven) apart wegschrijft. Later zullen we zien dat 
memo's ook per groep weggeschreven kunnen worden, bijvoorbeeld 
door de variabele :MEMO'S te maken. Ieder nieuw memo wordt hier 
door middel van de opdracht LPUT in opgenomen. Op deze manier 
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kunt u met LOGOMEMO experimenteren en er uiteindelijk uw eigen 
database mee opzetten. In verband hiermee zullen we later in dit 
boek dan ook sorteerroutines gaan bekijken, want elke goede data- 
base moet zijn gegevens kunnen sorteren. 

ҺОСОМЕМО is tevens interessant om te kijken over welke Disk- 
en Printer-opdrachten Logo beschikt. SETREAD en SETWRITE bij- 
voorbeeld zijn prachtige Logo-opdrachten, vooral wanneer ze met 
een printer worden gehanteerd. 


Laten we nu eens gaan kijken naar het eigenlijke programma. 


3.9 ГОСОМЕМО 


ТО LOGOMEMO 

CT TS SETBG O ERN CKEUS МЕРПЕР1 

SEICURSOR CS 13 PRÆ УКК а o memo... 
SETCURSOR [11 51 PR C1.Schrijven] 

SETCURSOR [11 71 PR C2.Lezen] 

SETCURSOR [11 91 PR [3.0OverzichtJ 

SETCURSOR [11 111 PR ГЧ.АҒагиккеп12 

SETCURSOR [11 131 PR Г5.Шіззеп2 

SETCURSOR [11 151 РР C6.Laden] 

SETCURSOR [11 171 PR [7.Opslaan) 

SETCURSOR CS 201 PR [Doe је keus maar ...... J 
MAKE ”KEUS RC 

ГЕ” :KEUS = PE TSCHRIJF) 

IEF KEUS = "о -ЕГБЕЕЗВЭ 


IF KEUS: “3 CUTE 

PF“: KEUS = ou ЕРЕМТ2 

IF :KEUS = "S CWISJ 

IF :KEUS = "Б [LAAD] 

IF :KEUS = nz CWSCHRIJFJ 
END 

ТО SCHRIJF 

KEEN 

PR [Schrijven :J 

PN ЕЈ 

PR L J 

PR [* Schrijf hier је memo :J 
PRG 

PR CJ 


MAKE “MEMO RL 

PR [Toets RETURN іп om door te gaan] 

MAKE "VERDER RC 

IF :VERDER = CHAR 155 CCT ERN :VERDER 1 ОБОМЕМОЈ 
END 


—— J 
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ы ЕЕЗ 

бә E 

PR CLezen :J 

РЕ Ga 

PREJ 

IF МОТ NAMEP ”MEMO CPR ГЕг zit geen memo in het ge 
heugen) WAIT 200 LOGOMEMOJ 

PR :MEMO 

MAKE "VERDER RC 

IF :VERDER = CHAR 155 CCT ERN :VERDER LOGOMEMOJ 
END 


CECS 

PR COverzicht :J 

PRL 

PR СЕЈ 

PR [Deze memo's staan op de disk :J 

CATALOG "D: 

PR CToets RETURN om door te gaan) 

MAKE "VERDER RC 

IF :VERDER = CHAR 155 CCT ERN :VERDER LOGOMEMOJ 
END 


TO PRNT 

ET: të 

IF NOT МАМЕР ”МЕМО CPR ГЕг zit geen memo іп het ge 
heugen) WAIT 200 LOGOMEMOJ 

PR CAFdrukken :J 

PR EJ 

PR CDruk RETURN om deze memo af te drukken : 2 


MAKE "VERDER RC 

IF :VERDER = CHAR 155 CERN :VERDER SETWRITE ”Р:12 
„DEPOSIT 558 0 

PR : МЕМО 

ЅЕТШРІТЕ ГЈ 

„DEPOSIT 559 56 

PR СЕЈ 

РЕА 

PR [Terug naar menu met RETURN) 

MAKE ”VERDER RC 

IF :VERDER = CHAR 155 CCT ERN :МЕКПЕК LOGOMEMOJ 
END 


— 


ТО WIS 

кунү С 

IF МОТ NAMEP ”MEMO CPR CEr zit geen memo in het ge 
heugen) WAIT 200 LOGOMEMOJ 

PR [Wissen :J 

PR: A? 

PR [Moet ік deze memo wissen J / N PJ 
RRE? 

PR: ЕЛ 

PR :MEMO 

MAKE ”KEUS RC 

IF :KEUS = ”J CERNS LOGOMEMOJ CLOGOMEMOJ 
END 


TO LAAD 

CI. TS 

PR [Geef de naam van de te laden memo : 2 
MAKE "NAAM RL 


PR LCJ 
PR С SE CDe memo :1 :NAAM 
PR Cwordt nu geladen .....1 


SETREAD WORD ”D: FIRST :NAAM 
MAKE "HENO RL 

REPEAT 3 ЕРЕ REI 

SETREAD [J 

LOGOMEMO 

END 


TO WSCHRIJF 

Eck ГА 

РЕ COpslaan :1 

PR EJ 

РКС 

IF МОТ NAMEP "МЕМО CPR ГЕг zit geen memo in het ge 
heugen) WAIT 200 LOGOMEMOJ 

PR [Deze memo opslaan PJ 

ER E 

PR LJ 

PR :MEMO 

PRC 

PR [Onder welke naam PJ 

MAKE ”МААМ RL 

PR СЯ 

PR С SE [Memo] :NAAM 

РЕ Сшога nu weggeschreven.) 

SETWRITE WORD ”D: FIRST :NAAM 

WAIT 50 .DEPOSIT 559 O 

PR : МЕМО гав 
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SETWRITE C3 

СТ 2.ПЕРОЗІТ553 58 
LOGOMEMO 

END 


LOGOMEMO, woord voor woord 


1. De procedure LOGOMEMO is de hoofdprocedure; deze laat (na 
enkele opdrachten voor het beeldscherm en het wissen van de 
variabelen :KEUS en :VERDER met ERN = ERase Name) op het 
scherm een keurig keuzemenu zien. Door het intoetsen van een 
getal kan een keuze worden gemaakt. Wanneer deze keuze is 
gemaakt wordt met de opdracht RC en de variabele :KEUS een 
subprocedure gekozen. 

2. De procedure SCHRIJF is heel eenvoudig. Hierin wordt de varia- 
bele :MEMO gemaakt die door de opdracht RL de waarde krijgt 
van de ingetoetste boodschap. Is de memo ingetypt dan gaat het 
programma (zie in de procedure de opdracht RC en CHAR 155 
(de ASCII-code van de RETURN-toets)) terug naar het menu. 
Meteen wordt de variabele :VERDER ook weer gewist met ERN. 

3. De procedure LEES begint met een testopdracht waarin we 
NAMEP weer tegenkomen. Deze testopdracht kijkt namelijk of de 
variabele :MEMO wel een waarde heeft (dus of :MEMO wel 
bestaat). Als we proberen een memo te lezen zonder dat we er 
een geschreven (of geladen) hebben, verschijnt de boodschap: 
"Er zit geen memo in het geheugen!" op het scherm of op de prin- 
ter. Bestaat er wel een variabele :MEMO, dan wordt de waarde 
hiervan (de ingetypte boodschap dus) keurig afgedrukt. 

De procedure gaat tenslotte, net als alle andere, terug naar het 
menu. 

4, De procedure ZIE laat door middel van de opdracht CATALOG 

"D: de diskette-inhoud zien. Naast de weggeschreven memo's 
zien we dan ook de LOGOMEMO-procedures staan (tenzij we voor 
de memo's een aparte diskette gebruiken). De opdracht CATALOG 
is alleen te gebruiken met een (of meer) disk-drive(s). Bij een 
tweede drive moet CATALOG "D2: worden ingetoetst. 

5. Het zou handig geweest zijn als we de procedure PRNT de naam 
PRINT hadden kunnen geven, maar dat kan niet, want PRINT is 
al een Logo-woord. Ook PRNT kijkt eerst of er wel een memo 
bestaat, en legt de verbinding met de printer met SETWRITE 
"P: . Deze opdracht zorgt ervoor dat alles wat op het scherm 
verschijnt afgedrukt wordt op de printer. Even verderop zien 
we de opdracht PR :MEMO staan. Deze heeft tot gevolg dat 
:MEMO inderdaad verschijnt, zowel op het beeldscherm als op 
papier. 

6. De procedure WIS begint met de, inmiddels bekende, testop- 
dracht. Immers als er geen memo is kan er ook geen memo gewist 
worden. Het wissen gebeurt daarna met ERNS = ERase Names. 
We zouden de procedure WIS ook zo kunnen veranderen dat er 
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een memo uit het geheugen (met ERN) of een memo van ае dis- 
kette gewist wordt. Een memo-bestand van diskette wissen we 
met ERF "D:bestandsnaam. 

T. De procedure LAAD maakt gebruik van de opdracht SETREAD. 
De opdracht LOAD zou hier namelijk niet de juiste opdracht zijn. 
Door WORD (na SETREAD) wordt de bestandsnaam gekoppeld 
aan de apparaatnaam (D:) (D staat voor Device). 

Nadat de memo op het scherm verschenen is wordt met MAKE 
"МЕМО RL de inhoud van de memo als het ware aan de variabele 
:MEMO gekoppeld. Daarna maakt SETREAD || de 'leesverbinding’ 
met de drive. 

8. De procedure WSCHRIJF (die we ook geen SAVE kunnen noemen!) 
begint met de bekende testopdracht: IF NOT NAMEP "МЕМО... 
Daarna krijgt de variabele :NAAM de naam van de memo en wordt 
met behulp уап SETWRITE "D: opgeslagen ('gesaved'). Ook hier 
worden weer de Poke-waarden uit Logo gebruikt om het beeld- 
scherm even uit te schakelen en zo het opslagproces te versnel- 
len. Met .DEPOSIT 559 58 wordt alles weer normaal en met 
SETWRITE || wordt de verbinding met de disk-drive verbroken. 
Vergeet dit niet! ! 


3.10 Logo-Manager; 
stap voor stap uw eigen database maken 


In deze paragraaf gaan we bekijken hoe we zelf een gegevensbestand 
in Logo kunnen maken. U krijgt de bouwstenen waarmee u uw eigen 
database kunt opzetten. Zo krijgt u een Logo-Manager naar uw eigen 
wensen en verlangens. U krijgt dus geen uitgewerkte database, maar 
wel uitgewerkte zoek-, sorteer-, laad-, opslag-, print- en telrou- 
tines. 

Indien u het voorafgaande, vooral de Logomemo, goed hebt 
doorgenomen, is het een kleine moeite uw eigen database samen te 
stellen. De namen van de procedures en variabelen zijn willekeurig 
gekozen. Het staat u dus geheel vrij er uw eigen namen aan te geven. 

Logo-Manager is een database met een andere opzet dan Logomemo. 
Bij Logomemo werden de gegevens steeds apart opgeslagen; bij Logo- 
Manager worden de gegevens in een lijst geplaatst en deze lijst wordt 
in zijn geheel weggeschreven. 

Om alle gegevens in een lijst te plaatsen maken we gebruik van 
de opdracht LPUT. Kijkt u eens naar deze procedures: 


EDIT “setup EM, COLG 1 
MAKE “Feiten C] MAKE “Feiten LPUT :1 :feiten 
END END 
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EDIT “feiten 
IF ЕМРТҮР :feiten CPR Г...пввп fFeiten)) 
Cprintfeiten :feiten) 


END 


EDIT “’printfeiten :1 
IF ЕМРТҮР :1 СТОРЈ 
ТҮРЕ LPA PR FIKSI -: 1 
printfeiten BF :1 
END 


Deze vier eenvoudige routines vormen de basis van de gehele data- 
base. Door de procedure "feit wordt ieder nieuw stukje informatie 

aan het einde van een lijst geplaatst. Kijkt u eens naar het gevolg 
van deze procedures: 


Psetup 

"felt СЈап Vis Dorpstraat В Laren) 

?feit [Henk Kok Kerkstraat 2 Aalst] 
ТЕвік CLia Jongman 't Pad 27 Breda) 
rFeiten 

*Jan Vis Dorpstraat 8 Laren 

“Henk Kok Kerkstraat С Aalst 

ж«Ііа Jongman 't Pad 27 Breda 

Psetup 

Pfeiten 

.. geen feiten 


Dit ziet er heel eenvoudig uit, maar toch is dit het grondbeginsel 
van deze database: een nieuw gegeven wordt aan het einde van een 
lijst geplaatst. 

Natuurlijk moeten er voor een echte database ook zoek- en 
sorteerroutines komen, maar dit is pas het begin. 

Laten we nu eens gaan kijken naar een zoekroutine. We noemen 
deze zoekroutine gewoon "zoek, het te zoeken gegeven :z en de lijst 
waaruit we moeten zoeken :feiten. De procedure lijkt heel sterk op 
de zoekprocedures die we al bij TEGENSTELLING en PSYCHIATER 
zijn tegengekomen. 

Om het maar eens eenvoudig te zeggen: "zoek neemt het gege- 
ven :z als uitgangspunt en bekijkt alle elementen van de lijst :feiten. 
Is er een element waarvan het eerste gedeelte overeenkomt met het 
gegeven :z dan wordt dit element afgedrukt. Dit zoeken gaat razend- 
snel, zelfs met een grote lijst. 

Een beperking van "zoek is, dat de procedure alleen kan zoeken 
met het eerste gegeven van een element als uitgangspunt. Dit kunt 
u echter in een handomdraai veranderen. Door naast FIRST ook 
FIRST BF te gebruiken kunt u elk willekeurig gegeven uit de lijst 
als uitgangspunt nemen voor een zoekroutine. Voor het gemak is 
hier voor de volgende vorm gekozen: 
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EDIT "”zoek :2 :feiten 

IF EMPIYP :feiten LSTDP1J 

IF :z = FIRST FIRST :feiten CPR FIRST :Feiten zoek 
:2 BF :feiten) [zoek :2 

ВЕ :Feiten) 

END 


En dat is het hele verhaal. Deze procedure 'zoekt!' in de gehele lijst 
feiten of het gegeven :z erin staat. Kijk maar: 


Pzoek "Jan :feiten 

Jan Vis Dorpstraat В Laren 

PFfeit СЈап de Groot Laan 33 Holst] 
Pzoek "Jan :feiten 

Jan Vis Dorpstraat В Laren 


Jan de Groot Laan 33 Holst 
+ 


Willen we even kijken hoeveel gegevens er beschikbaar zijn? Dat is 
geen enkel probleem, we tellen gewoon de elementen van de lijst. 
Kijk maar: 


EDIT "683 iñ 

PR CSE [Er zijn momenteel :1 COUNT :n "gegevens 
”beschikbaar 

END 


De opdracht COUNT telt gewoon alle elementen van de gegeven lijst. 


Iets ingewikkelder wordt het wanneer we een sorteerroutine gaan 
bekijken. Een sorteerroutine is een procedure die de gegevens van 
de lijst :feiten alfabetisch rangschikt. 

De hoofdprocedure zou er zo uit kunnen zien: 


TO sorteer :n 

MAKE ”gesorteerd sort :n [C] 

РЕ CGegevens tonen J / NJ 

MAKE ”toon RC 

IF OR :toon = "J :toon = ”j CPR ssort.:gesorteerd] 
Г6ТОР1 

END 


U ziet het, de door ..sort.. gesorteerde lijst wordt "gesorteerd 
genoemd en op verzoek door ssort op het scherm getoond. 


De in de sorteerroutine voorkomende subprocedures sort, in, voor 
en ssort zien er als volgt uit: 
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FD Am. ҙа zb 

IF EMPTYP :b COP ЕРОТ [C3 LIST :а [JJ 

IF voor :а FIRST BF :b COP FPUT in :a FIRST :b BF 
: bJ 

OP LPUT in :а LAST :b BL :Ь 

END 


TO ssort :а 

IF EOQUALP :а CJ COP EI 

OP С SE ssort FIRST :a FIRST BF :a ssort LAST :a 
END 


ЕПТІ "voor: а tb 

IF OR ЕМРТҮР :а ЕМРТҮР :b ГОР EMPTYP el 

IF NOT EQUALP FIRST :а FIRST :b COP CASCII FIRST :а2 
< СРӨГСІТП FIRST :D21 

OP voor BF :a BF :b 

END 


TO sort za :D 

IF ЕПРТҰР ç& &UP 2192 
MAKE "Cp іп FIRSI :а :D 
ОР sort BF :а P 

END 


U merkt wel dat de procedures zo langzamerhand iets minder ееп- 
voudig worden. Het is echter een kwestie van ervaring. Als u maar 
regelmatig oefent, leest u na een tijdje ook de regel: 


IF МОТ EQUALP FIRST :а FIRST. :b COP CASCII FIRST rei 
SCE FIRST :0)7 


met gemak als: 


indien het eerste teken (of element) van :a ongelijk is aan dat 
van :b, geeft dit het eerste teken (of element) van :а een 
lagere ASCII-code dan dat van "D. 


En daarmee hebben we meteen de essentie van de sorteerroutine te 
pakken: alfabetisch rangschikken op grond van de ASCII-waarde 
van de tekens. 


Voor de printroutines, de laad- еп opslagprocedures kunt u de des- 
betreffende opdrachten uit Logomemo gebruiken. U moet deze dan 
wel aanpassen! Denkt u hierbij de opdrachten SETWRITE en 
SETREAD te gebruiken, denk dan om de 'sluitopdracht' SETREAD | | 
of SETWRITE |1. 


Met behulp van de gegeven procedures kunt u beslist een Logo- 
Manager maken die volledig is aangepast aan uw eigen wensen en 
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verlangens. Bovendien doorziet u een gegevensbestand veel beter 
wanneer u het zelf hebt opgezet. 

Om u een indruk te geven van de hoofdprocedure volgt hier 
een voorbeeld van een mogelijke opzet. Het advies is echter: 
schrijf/bewerk eerst de subprocedures en controleer deze op hun 
werking. Schrijf de hoofdprocedure pas als alle subprocedures 
klaar zijn (де sorteer-, de print-, de wis-, de tel-, de opslagpro- 
cedure, enzovoort). 


Logo-Manager, voorbeeld van een opzet 


Logo-Manager 
Gegevens-bestand 


Menu 


‚een bestand beginnen 
‚een bestand veranderen 
‚een bestand kiezen 
‚een bestand laden 
‚een bestand opslaan 
‚opgave bestanden 
‚gegevens toevoegen 
„gegevens veranderen 
‚gegevens bekijken 
10.gegevens sorteren 

11 .gegevens tellen 

12 . gegevens afdrukken 


LD OO JO UE ü) [J > 


Maak een keus door een getal (1-12) in te toetsen 


Zo zou een menu eruit kunnen zien. We kunnen nu met de opdracht 
MAKE "KEUS RC, door een keus te maken uit het menu, bijvoor- 
beeld een van de volgende subprocedures aanroepen: 


1. START - een bestand beginnen we met deze procedure. 
Functies: 
- variabelen in het werkgeheugen wissen met de procedure 
setup ; 
- vragen om een naam voor dit bestand 
- deze naam toekennen aan de informatie die wordt opgeslagen 
in de variabele :feiten; 
- teruggaan naar het menu, bijvoorbeeld met de RETURN-toets. 
2. VERANDER een bestand met een procedure die 
- de oude variabelenaam wist (ERN); 
- aan :feiten een nieuwe naam toekent. 
3. KIES een werkbestand door: 
— uit een overzicht van alle bestanden er een te (laten) kiezen; 
- door te verwijzen naar de LAAD-optie. 
Pas op: met het kiezen van een bestand kan er nog niet gewerkt 


worden. 

4. LAAD een werkbestand op dezelfde manier als іп LOGOMEMO. 

Denk eraan: 

- SETREAD "D: te gebruiken; 

- aan de variabele :feiten de zojuist ingevoerde gegevens te 
koppelen; 

- SETREAD || af te sluiten; 

- terug te gaan naar het menu. 

5. SAVEB, een bestand opslaan, gaat op dezelfde manier als in 
LOGOMEMO. Nu echter bestaat het bestand dat opgeslagen moet 
worden uit meerdere gegevens. Gebruik zoveel mogelijk de op- 
drachten uit LOGOMEMO. 

6. CATALOGISEREN is een procedure die een opgave doet van де 
bestanden іп de database; hij moet de opdracht CATALOG "D: 
bevatten. 

Een opgave van de bestanden kan ook afgedrukt worden. Maak 
hiervoor eerst een koppeling met de printer met SETWRITE "Р: 
Alles wat nu op het scherm verschijnt, dus na CATALOG "D: 
ook de inhoudsopgave, wordt keurig afgedrukt. 

Opmerking. Geef aan het einde wel de opdracht SETWRITE []! 

7. СЕСТОЕ kan de procedure zijn die de gegevens toevoegt aan 
het gekozen bestand. Maak hierbij gebruik van de procedure 
:feit. Vergeet niet uit te leggen hoe ееп en ander in zijn werk 
gaat. Vooral het gebruik уап |, : en " vereist enige oefening. 

8. GEGVER kan de procedure zijn die een te kiezen element (:feit) 
uit de lijst :feiten wist (met ERN) en vervangt door een ander 
:feit. 

9. GEGZIE zou u de procedure kunnen noemen die alle gegevens 
op het scherm toont. Maak hiervoor gebruik van de procedure 
printfeiten. Ga weer terug naar het menu, bijvoorbeeld met de 
opdracht KEYP. 

10. SORTEER zou een vrij omvangrijke procedure moeten zijn waar- 
in de procedures sorteer, sort, in, voor en ssort een plaats 
krijgen. | 

11. GEGTEL Кап een heel korte procedure zijn, uitgaande van tel. 
Geef wel aan dat na tel de procedurenaam genoemd moet worden. 

12. GEGPRNT, de laatste procedure, kan geheel geschreven worden 
aan de hand van de procedure PRNT uit LOGOMEMO. 


Opmerking. Houd bij de opzet van deze Logo-Manager het beschik- 
bare geheugen wel in het oog. Bij LCSI Logo van Atari is de nog 
beschikbare geheugenruimte steeds op te vragen met PR NODES. 


Op deze manier, en met behulp van de gegeven routines en hulppro- 
cedures, kan iedereen zijn eigen Logo-Manager schrijven, een eigen 
database in Logo, naar eigen inzichten en ideeën. Veel succes 
ermee! ! 
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3.11 Het maken van adventures (avonturenspelletjes) 


ç ` "y | | ef T 
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Met Logo zijn op eenvoudige wijze heel aardige avonturenspelletjes 
te maken, spelen waarin de speler als het ware de hoofdrol speelt 
en zo zelf de loop van het verhaal bepaalt. 

Als voorbeeld volgt nu een klein gedeelte uit 'Het grote Yama 
Avontuur', een avonturenspel speciaal voor kinderen geschreven. 
Zoals u ziet wordt niet alleen уап Logo-taal gebruik g>maakt, maar 
ook van Logo-schildpadwereld (Turtle Graphics), Log‚o-sproken en 
Logo-muziek. 

Bekijkt u de listing maar eens rustig. 


ІО BOS 
CS CI meeer 
РОТ5Н Ч :MAAN 


PR [Even wachten ....1 
PR CDan laat ik je het bos zien 
WRAP 


REPEAT 2 [BOMEN] 

GRAS 100 CT 

PR [Wat een eng bos vind je niet 71 
PR CWil je er nog steeds doorheen 71 
PR (Wat wil je PJ 

PR Г1.Поог het bos) 

PR [2.Terug naar het strand) 

MAKE “KEUS RC 

IF :KBUS "© bai 
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СТ 

РК С SE [Goed ,1 :NAAM "gan "gaan "we "verder 
PR (Daar lopen ше іп het bos] 

PR ГЕп het wordt steeds donkerder) 

SETBG 5 WAIT БО SETBG Ч WAIT БО 

SETBG 3 WAIT БО SETBG 2 WAIT БО 

SETBG 1 WAIT 60 SETBG O 

MAAN CT 

PR [En nu is het helemaal donker) 

PR [Wel wat eng he] 

PR [En gaat het nog onweren ook] 

BLIKSEM 

WAIT 300 CT 

РА. СРЛОСИВ І НИЕ; ¿pul J 

PR [Wat is dat PPPPJ 

PR (Wat komt daar op ons af PJ 

WARSI 200 FS CT ES- UIL 

SS PR СІК ben Cas , de toveruilj 

PR С SE [Wat doe je hier ,1 "Noen mg 

PR [Je mag doorlopen als jeJ 

PR Гор dit raadsel een antwoord weet) WAIT БОО CT 
PR [Het heeft Ч poten maar kan niet lopen] 

PR [Ra , га wat is dat 72 

PR Г1.Евп paard) 

PR ГО.Евп tafel 

PR (3.Een vis) 

MAKE "ANTWOORD RC 

IF :ANTWOORD = ”2 CPR [Okee ga maar verder) CPR LJ 


ammer dat was Fout , nu is je avontuur afgelopen) 
2 

РЕ С SE [Daag ,1 :NAAM 

END 


Wilt u zelf een avonturenspel maken? Dan is het verstandig als volgt 
te werk te gaan. 


ө Ontwerp eerst een verhaal op papier en geef daarin alle, door de 
speler te kiezen, mogelijkheden aan. Een mogelijk schema ziet u 
op de volgende bladzijde. 


U ziet dat er nogal wat mogelijkheden zijn. Elk van deze mogelijk- 
heden kan echter door de speler worden gekozen. Elke mogelijkheid 
zal dus in een aparte procedure moeten staan. 


Begin na het ontwerpen van het verhaal met het schrijven van de 
subprocedures. Test alle procedures zorgvuldig. 
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Voor een kasteel ga je ... 
1. naar binnen 
2. buitenom 


Binnen ga je ... 
1. de gang door 
2. de trap op кы 


Buiten ga je ... 
1. door het kelderraam 
2. verder 


t° 


In de gang ра je ... 
1. linksaf 
2. rechtsaf 


Ор de trap lopend ga де... 
1. op het geroep af - 
2. bij het geroep vandaan 


In de kelder aangekomen ga је ... 
1. door de kelderdeur 
2. even uitrusten 


Verder lopend ga |е... 


1. over de muur de kasteeltuin binnen 
2. het kasteel voorbij ER rj ge | 


enzovoort, enzovoort. 


ө Houd, indien het avonturenspel in één keer ingevoerd wordt, 
rekening met de beschikbare geheugenruimte. Het is raadzamer 
eerst een avonturenspel op diskette te maken, waarbij steeds een 
gedeelte van de procedure wordt ingevoerd. 

ө Maak bij het schrijven van de procedures niet alleen gebruik van 
Logo-taal. Ook Logo-schildpadwereld, Logo-muziek en Logo- 
sproken kunnen zeer goed worden toegepast. 

ө Ontwerp ook procedures die u vaker kunt gebruiken, Denk bij- 
voorbeeld aan procedures als BLIKSEM, REGEN, WIND. 

ө Denk eraan dat ook een kort avontuur al veel procedures kost. 
Maak de procedures daarom zo efficiënt mogelijk. 

ө Gebruik variabelen met mate, en wis steeds alle niet meer gebruik- 
te variabelen. Juist deze variabelen nemen veel geheugenruimte 
in beslag. Benut de geheugenruimte optimaal. 


Met enige creativiteit zijn er met Logo bijzonder aardige ‘avonturen! 
te schrijven. 
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3.12 Het gebruik van lijsten 


Ook buiten de Logo-taalwereld kunnen we natuurlijk het fenomeen 
lijst' goed gebruiken. Laten we maar eens naar een paar voorbeel- 
den gaan kijken. 

We definiëren zelf een paar opdrachten, bijvoorbeeld SRECORD 
en REPLAY. Met behulp van deze opdrachten kunnen we verschil- 
lende tekeningen in het geheugen opnemen en deze later weer laten 
tekenen. Elke tekening kunnen we een eigen naam geven en deze 
later weer laten 'hertekenen!' met de opdracht REPLAY :naam. Met 
enige aanpassing kunt u hier een uitgebreid tekenprogramma mee 
schrijven, compleet met SAVE- en LOAD-procedures (zie hiervoor 
bijvoorbeeld LOGOMEMO). 

SRECORD en REPLAY zijn echter ook voor vele andere zaken 
te gebruiken. Wat denkt u van muziek? Als we in plaats van Turtle- 
opdrachten nu eens muziekopdrachten gebruikten, dan kunnen we 
onze eigen Logo-muziek opnemen, ieder muziekstuk een naam geven 
en met REPLAY :naam het gekozen muziekstuk beluisteren. 

De mogelijkheden zijn legio, maar u krijgt ze niet op een pre- 
senteerblaadje. 

De procedures RECORD, SRECORD, REPLAY en RW kunt u 
naar uw eigen smaak en idee aanpassen, veranderen en gebruiken 
in eigen programma's. Zoals u ziet doet de procedure RECORD niets 
anders dan iedere opdracht met behulp van LPUT aan het einde van 
een opdrachtenlijst plaatsen. Op deze manier ontstaat een opdrach- 
tenlijst die door REPLAY opdracht voor opdracht wordt afgewerkt. 

Het bovenstaande kunt u toch wel als een voortreffelijke illus- 
tratie van de gebruikersvriendelijkheid van Logo beschouwen. 


Hier volgen de procedures: 


TO SRECORD 

CT 55 PR [Geef een naam :1 
MAKE "NAAM RW 

MAKE "OPDRACHTEN Г7 

RECORD 

MAKE THING “NAAM : ОРОРАСНТЕМ 
END 


TO RECORD 

MAKE “OPDRACHT RL 

IF: OPDRACHT = "STOP .CSTOP) 

RUN :OPDRACHT 

MAKE ”OPDRACHTEN LPUT :OPDRACHT :OPDRACHTEN 
RECORD 

END 
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TO REPLAY :OPDRACHTEN 

IF EMPTYP :OPDRACHTEN CSTDPJ 
RUN FIRST :OPDRACHTEN 
REPLAY ВЕ :OPDRACHTEN 

END 


TO RW 
OUTPUT FIRST RL 
END 


3.13 Logo-tekst, de bouwstenen voor een tekstverwerker 


We moeten goed onder ogen zien dat het met behulp van Logo niet 
mogelijk is een tekstverwerker als bijvoorbeeld WordStar te maken. 
Daarvoor is de taal Logo niet geschikt. In dit hoofdstuk krijgt u 
evenmin een complete tekstverwerker in Logo. 

Wat u wel krijgt zijn de bouwstenen waarmee u zelf, op betrek- 
kelijk eenvoudig wijze, een tekstverwerker in elkaar kunt zetten. 
Een tekstverwerker geheel naar uw eigen wensen en verlangens. 
Een tekstverwerker op maat. 

Laten we maar eens gaan kijken welke 'bouwstenen' we nodig 
hebben. 

Een eenvoudige tekstverwerker moet de volgende mogelijkheden 
hebben: 


- een menu, dat te allen tijde kan worden aangesproken; 

- een 'schrijfgedeelte!, waaruit we snel weer met één enkele toets 
naar het menu kunnen komen; 

- een "еевредее е", waar we de zojuist via het toetsenbord of van- 
af diskette ingevoerde tekst kunnen nalezen; 

- een ‘overzicht! van de reeds op diskette weggeschreven teksten; 

- een 'wisgedeelte' om een tekst uit het geheugen/van diskette te 
wissen ; 

- een laadgedeelte' om een tekst van diskette (eventueel band) te 
laden ; 

- een ‘'opslaggedeelte! om teksten weg te schrijven naar diskette/ 
band; 

- een eenvoudig ‘opmaakgedeelte' met bijvoorbeeld een 'ЅЕАКСН / 
REPLACE?-functie; 

- en alles wat u verder belangrijk vindt. 
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Het menu 


Een menu maken is niet zo ingewikkeld. Zorg voor een rustige 
schermopbouw en een logische indeling. Denk er ook aan steeds de 
niet meer gebruikte variabelen te wissen. Dit is belangrijk indien u 
nog geheugenruimte wilt overhouden om te kunnen schrijven. 

Het is ook belangrijk dat u dit menu te allen tijde kunt aanroe- 
pen. Dat kan natuurlijk door steeds MENU in te toetsen en de pro- 
cedure daarmee op te roepen. Handig is dit echter niet. 

Het is beter gebruik te maken van een hulpprocedure als 
TERUG. Bij iedere optie van het menu plaatst TERUG de tekst 


Toets ESC voor MENU 


onderaan het scherm. Een druk op de ESC-toets is dan voldoende 
om weer in het menu te komen. 

Er is gekozen voor de ESC-toets omdat deze bij het schrijven 
van een tekst niet wordt gebruikt; zo kan er geen verwarring ont- 
staan. 

Een menu en een procedure TERUG kunnen er zo uitzien: 


TO MENU 
СІ TS SETBG О ERN [KEUS VERDER) 
ЭШЛИ a PR С.е otk «с, dl 


SETCURSOR СЧ 51 PR [1.Schrijf tekst] 
SETCURSOR ЕЧ 71 РЕ [2.Lees tekst] 
SETCURSOR ЕЧ 82 PR [3.0OverzichtJ 

SETCURSOR СЧ 111 PR C4.Afdrukken tekst] 
SETCURSOR [4 131 PR [5.Uis tekst] 
SETCURSOR ЕЧ 151 PR [6.Laadt tekst] 
SETCURSOR [4 171 PR [7.Opslaan tekst] 
SETCURSOR C4 001 PR [Doe je keus maar ...1 


ІТ Ы "те CERN KEUS LLEJ 

Er АМО 72 LORN :KEUD SIE 

IP NEUS 98 EERN REUS PRN 

IF i КЕНӘ т "5 LERN KEUS WIS] 

EF KEUS = "Б CERN':KEUS LAADJ 

ҮР TREDDE CERN tT KEUS -WSCHRI JF J 
END 

TO TERUG 


SETCURSOR C10 231 PR (Toets ESC voor MENU] 
MAKE “keuze RC 

IF :keuze = CHAR 27 CERN “keuze MENU] 

END 
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Schrijf 
Een schrijfgedeelte zou in principe kunnen zijn: 


- Begin met een variabele :tekst. 

- Geef deze variabele de waarde van een lege lijst: MAKE "tekst []. 

- Ga dan naar een recursieve subprocedure waarin de variabele 
‘regel is opgenomen. 

- Laat :regel de waarde krijgen van de ingetypte zin: 
MAKE "regel RL. 

- Plaats :regel (afgesloten door een RETURN) achter in :tekst. Zo 
wordt iedere :regel een element van :tekst. 

- Tedere regel wordt achter de voorgaande in :tekst geplaatst. 

- Verlaat de recursieve procedure bijvoorbeeld door het typen van 
een lege regel. 

- Geef de mogelijkheid terug naar het menu te gaan met de proce- 
dure TERUG. 


Het hoeft natuurlijk niet, maar u zou het zo kunnen doen: 


30 BSC 

ра ча 

MAKE “tekst ГЈ 
SCHRIJF 

TERUG 

END 


ТО SCHRIJF 

19 

MAKE ”regel RL 

IF ЕМРТҮР :reg8l CSTOPJ 

MAKE ”tekst LPUT :regel :tekst 


ERN “regel 
SCHRIJF 
END 


Hiervoor heeft u beslist twee procedures nodig, want de opdracht 
MAKE "tekst [ ] kan niet in de recursieve procedure staan еп even- 
min in het menu. 

Terwijl u aan het schrijven bent kunt u gebruik maken van alle 
opmaakfuncties van het toetsenbord: CLEAR, INSERT, DELETE 
BACK SPACE, enzovoort. 
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Lees 


Ook het lezen van de tekst kan het beste met twee procedures 
gebeuren. De eerste procedure controleert of er wel een tekst in 
het geheugen zit. Het is zeer velangrijk om steeds zulke controle- 
opdrachten in te bouwen. 

Zo zouden de bouwstenen voc c het leesgedeelte er uit kunnen 
zien: 


IU LLE 

CT 

IF NOT NAMEP "tekst [TERUG] 
LEES :tekst 

TERUG 

END 


TO LEES :tekst 

IF EMPTYP :tekst [STOP] 
PR FIRST :tekst 

LEES BF :tekst 

END 


Ziet u dat ook hier weer besloten wordt met de procedure TERUG? 


Overzicht 


Als we even willen kijken welke teksten er al op diskette staan, kan 
dat natuurlijk zeer snel gebeuren met de opdracht CATALOG "D: . 
U zou er de volgende procedure van kunnen maken: 


TU СТЕ 

СТУ TS 

PR [Deze staan op diskette :1 
PR C9 

CATALOG ”D: 

TERUG 

END 


Afdrukken 


Nog zo'n eenvoudige bouwsteen in de tekstverwerker. We maken 
hier gebruik van de opdracht SETWRITE "P: . Kijkt u maar: 


TO PRNT 
CT TS — SETWRITE [J 
SETWRITE ”P: la aai TERUG 


LEES :tekst — 7 END 
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Wellicht is het verstandig ook hier een controle in te bouwen, bij- 
voorbeeld de opdracht: 


IF МОТ NAMEP “tekst ГТЕРІМ52 


Zoals u weet controleert deze opdracht of de variabele :tekst wel 
een waarde heeft. Met andere woorden: of er wel een tekst in het 
geheugen zit. 


Wis 


Het kan voorkomen dat u een bepaalde tekst in zijn geheel uit het 
geheugen wilt wissen. U zou dit kunnen doen met de volgende een- 
voudige procedure: 


TO WIS 

GE | 

IF NOT NAMEP “tekst [TERUG] 

PR [Deze tekst wordt gewist :1 
LEES :tekst 

ERN “tekst 

TERUG 

END 


Wilt u ook de mogelijkheid hebben een tekst van de diskette te 
wissen? Dit kan met de opdracht ERF "D:bestandsnaam. Verander 
de procedure dan zo: 

1. Stel de vraag: wissen uit Geheugen / van Diskette (G / D). 

2. Toets het antwoord MAKE "antwoord RC іп. 

3. Als het antwoord G is, gebruik dan de reeds genoemde opdrach- 
ten: ТЕ antwoord = "G [PR [Deze tekst wordt gewist :] LEES 
:tekst ERN "tekst TERUG]. 

4, Als het antwoord D is, vraag dan welke tekst gewist moet worden: 
PR [Welke tekst ?] MAKE "К RW. 

5. Geef dan de opdracht de bedoelde tekst van diskette te wissen: 
ЕКЕ МОНО "D: :k 

6. Vergeet niet de procedure TERUG aan te roepen. 


Bij het vragen naar de naam van de te wissen tekst zou u een paar 

tekstopdrachten kunnen ‘inbouwen! om te controleren of 

- er wel iets is ingetypt: IF EMPTYP :k [WIS]; 

- de ingetypte naam niet langer is dan acht tekens: IF COUNT :k 
> 8 [WIS]; 

- de gewenste tekst wel voorkomt ор de diskette. 


Voor deze laatste test hebt u echter bijna altijd een extra proce- 
dure nodig. U moet dan opdrachten geven om 

- alle namen van tekstbestanden in een lijst te plaatsen; 

- met MEMBERP te kijken of de ingetypte naam hier ook in voorkomt. 
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Een heel werk dus. De procedures geven we u niet. U krijgt per 
slot van rekening niet alles cadeau...! 


Laad / Opmaak 


Een tekst laden gaat ор dezelfde manier als іп LogoMemo staat aan- 
gegeven. Het is weinig zinvol dat hier te herhalen. De opdracht 
hiervoor is SETREAD. 

De procedure die u moet gebruiken kan ook veel lijken op de 
procedure om een tekst op te slaan. Kijk maar: 


TO WSCHRIJF 

ks 

IF NOT NAMEP "tekst CPR [Er is geen tekst om op te 
slaan !1 TERUG 

PR С SE [De tekst] :паат “wordt "nu “opgeslagen. 
SETWRITE WORD "DU: :паат 

LEES :tekst 

SETWRITE Г1 TERUG 

END 


ТО RW 
ӨР FIRSI RL 
END 


Ziet u de controle-opdracht? Hij zou natuurlijk niet nodig moeten 
zijn, maar ja, je weet maar nooit. 


Opmaak 


Het werkt plezierig wanneer u voor het opmaakgedeelte een apart 
klein menu maakt. Dit zou er zo uit kunnen zien: 


bio ge te Kk st 
Opmaak - menu 
Maak uw keuze : 


1.2оек / vervang 
e.Bestanden samenvoegen 
3.Bestanden splitsen 
Mie etn ә 

5 


Enzovoort. Hier kunt u alle hulpmiddelen kwijt die u denkt bij het 
schrijven van een brief ooit nodig te hebben. 

Iedere keuze van het menu moet verwijzen naar een procedure. 
Zo zou u bij zoek/vervang kunnen verwijzen naar de later in dit 
hoofdstuk beschreven procedure REPLACE. 
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We zijn aan het einde van de bouwstenen gekomen. We hebben ze 
lang niet allemaal genoemd. Zo is er bijvoorbeeld de mogelijkheid om 
met meerdere teksten tegelijk in het geheugen te werken. Maar het 
is niet goed u alle plezier in het experimenteren te ontnemen. Het 
is toch juist veel leuker dat u, al experimenterend met de hierboven 
aangedragen bouwstenen, uw eigen tekstverwerker op maat maakt 
dan dat u een kant-en-klare tekstverwerker in de schoot geworpen 
krijgt. 


3.14 Enige nuttige Taal-procedures 


Lijsten kunnen we op velerlei manieren manipuleren, daar hebben 
we in dit hoofdstuk al verscheidene voorbeelden van gezien. Toch 
bestaat de mogelijkheid, dat u bij het programmeren van bijvoor- 
beeld een database net die opdrachten nodig hebt die de door u 
gebruikte Logo niet bezit. 

Zo kan het voorkomen dat u zoekt naar een opdracht die twee 
lijsten samenvoegt, zodanig dat er in het resultaat geen dubbele 
elementen voorkomen. Het is betrekkelijk eenvoudig (met de 
opdracht LIST) om met 


[A BClen.l1CÇC D B] 
de lijst 
АВОС DRI 


te verkrijgen, maar dat is niet uw bedoeling. In een Logo-listing 
voor Terrapin Logo (een door Apple gebruikte Logo-versie) kunt 

u de procedure UNION vinden, die natuurlijk wel in LCSI Logo 

moet worden omgezet. Hieronder vindt u de listing van deze nieuwe 
procedure, die de naam TOGETHER zou kunnen dragen. U krijgt 

de listing eerst voor Engelstalige Logo, daaronder voor Nederlands- 
talige Logo. 


TO JOGEFKHER «КМТУ SLR 

ІГ ЕПРТҮР :LIJSILI ҺЫ dre 

ІК МЕМВЕКР. С. ЕТҚӨТ ШІЗЕГІ 2 ¿L24512 СОР 
ІПӘСІНЕН C BF (LIJSIZ ) :LEJBIZJ COP ЕР 
UTCCLFERST %DTJST0:DBb'TUBSRTIHER ACO ВЕ. :Ш1Ј5 
Де e End e 

END 
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Willen we nu de lijsten [A B C D E F G] en [A B E F X Z] samen- 
voegen, dan toetsen we in: 


PR TOGETHER CA BAD E PF. GJ ER B E TF X ei 
en we krijgen als uitkomst: [A B C D E F G X Z]. 


Opmerking. Vergeet niet de opdracht PR voor TOGETHER op te 
nemen (tenzij u TOGETHER als subprocedure gebruikt). Zonder PR 
weet Logo namelijk niet wat het met de nieuwe lijst moet doen en 
krijgen we de boodschap: 


YOU DON’T SAY WHAT TO DO WITH [ñ B C D E FG X 21 


We hebben nu een procedure die twee lijsten samenvoegt. Deze weg 
vervolgend kunnen we natuurlijk een procedure schrijven die twee 
lijsten vergelijkt; een procedure die ziet of er in twee verschillende 
lijsten wellicht overeenkomstige elementen zitten. Zo'n procedure 
kan o.a. in bestandsprogramma's zeer bruikbaar zijn. 


ТО COMPARE 21295871 :LIJSTe 

¿P БІРТҰР- :412871 COP [JJ 

ІР ПЕЛБЕКР FIRSI :LIJST1 :LIJST2 ГОР FPU 
Т FIRST :1125871 COMPARE BF :LIJST1 :LIJS 
е COP COMPARE BF :LIJST1 :LIJST&J 

END 


Een voorbeeldje: PR COMPARE ГА B CJ CB с DJ 
B C 


Even eenvoudig als doeltreffend. 


Maar we zijn nog niet klaar. Soms is het nodig een element uit een 
lijst te vervangen door een nieuw element. Denk bijvoorbeeld maar 
even aan een gegevensbestand waar oude gegevens door nieuwe 
moeten worden vervangen. In zo'n geval zou het gemakkelijk zijn 
als er een opdracht REPLACE bestond die het ene element in een 
lijst door het andere kon vervangen. 

Welnu, sommige Logo-versies beschikken inderdaad over de 
opdracht REPLACE, maar we kunnen hem ook eenvoudig zelf maken: 


ТЕ ЖЕРАБЕ :G ;N -LIJST 

АҒ КҮРТҮР + L TJST- СОР CJ 

ІР” FIRST LIJST СОР ЕРОТ :N:REPLACE 
О.М ВЕ :L4281J TOP FPUT FIRST :LIJST 
KEPLALE OQ :N BF :LTJSTJ 

END 


Zo wordt PR REPLACE "A: "B ERG D) ... CB C DI 
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Een laatste hulpprocedure is de opdracht CHECK. CHECK kijkt 
voor u naar de waarde van een variabele en drukt die af. Dit is de, 
zeer eenvoudige, procedure: 


EDIT “CHECK :& 
PR (SE :a "heeft "als "waarde THING :а 
END 

We zouden ook gewoon alleen de opdracht THING kunnen gebruiken: 
PR THING :a 

Dit heeft hetzelfde resultaat. 


Op deze manier zijn er vele nuttige en bovenal leerzame procedures 
te schrijven die het programmeren gemakkelijker maken. 


Hoofdstuk 4 
LOGO: CIJFERS EN GETALLEN 
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4.1 Inleiding 


Zoals wij in het voorwoord reeds hebben gezegd, kunnen computers 
eigenlijk alleen maar 'cijfertaal' verstaan, en wordt iedere opdracht 
die we de computer geven ogenblikkelijk omgezet in een reeks enen 
en nullen. We spreken hierbij van BITs (ВІпагу digiTs). Straks 
komen we daar uitgebreid op terug. 

We kunnen in Logo ook rekenkundige bewerkingen uitvoeren. 
In dit hoofdstuk zult u er verscheidene zien. 

Logo accepteert zowel geheeltallige (integers) als decimale getal- 
len. Voor alle duidelijkheid: 


645 is een geheel getal en 
6.45 is een decimaal getal. 


Soms zien we, bijvoorbeeld als uitkomst van een berekening, het 
volgende: 


3E6 


Dit is de wetenschappelijke notatie die Logo gebruikt bij decimale 
getallen van meer dan zes cijfers. 3E6 wil zeggen: 3 maal 10 (tot de 
macht 6) > 3 x 1.000.000 = 3.000.000. 


De basisbewerkingen optellen, aftrekken, vermenigvuldigen en 
delen zijn mogelijk als INFIX-notatie. De INFIX-notatie gaat ervan 
uit dat het rekenkundige bewerkingsteken (+ - * /) tussen de 
getallen staat: 


Optellen БИНТ $ FA 

Aftrekken { Ka? 9-4 

Vermenigvuldigen : BNT 94 

Delen { brink 5/4 
1,25 


Opmerking. Denk goed om de spaties; PRINT 5/4 geeft bij sommige 
Logo-versies niet dezelfde uitkomst als PRINT 5 / 4. 
Het -teken kan (zonder spatie) ook worden gebruikt om een nega- 
tief getal aan te geven. 
Voorbeeld SPRINT 5 + -4 

1 


Voor het optellen en vermenigvuldigen kunnen we echter ook een 
PREFIX-notatie gebruiken in combinatie met SUM en PRODUCT. De 
bewerkingen SUM en PRODUCT staan hierbij voor de getallen die 
respectievelijk opgeteld en vermenigvuldigd moeten worden. 
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Kijk maar: 


PRINT SUM 5 4 

EN SUM (2 5 7 6 9 4 -3) 
PRIN PRODUCT 5 4 
PRINT PRODUCT (5 4 5) 


4.2 Wiskundige functies 


In deze paragraaf kijken we naar een aantal wiskundige functies. 


SIN Hiermee wordt de sinus van een hoek berekend, 
bijvoorbeeld: 


PRINT SIN 100 
0. 9848 


COS Hiermee berekenen we de cosinus van een hoek, 
bijvoorbeeld: 


PRINT COS 30. 
0.86605 


TAN Op basis van de sinus- en cosinus-berekening kun- 
nen we ook de tangens van een hoek berekenen. 
Sommige Logo-versies bevatten de TAN-functie stan- 
daard, maar de functie kan ook door een procedure 
gedefinieerd worden: 


EDIT “TAN :HOEK 
KLF -CSIN:NDEKJ 7 CUS. : HOEK 
END 


Een voorbeeld: 


_PRINT TAN 444 
9.51511672 


SQRT Hiermee wordt de vierkantswortel (SQare КооТ) van 
een getal berekend: 


PRINT SQRT 100 
10 


100 


REMAINDER Dit is een heel speciale functie. De opdracht vraagt 
om twee getallen, deelt het eerste door het tweede en 
geeft als uitkomst de rest van de deling. Kijk maar: 


PRINT REMAINDER 19 5 
4 
PRINT REMAINDER 19 50 
19 


Hiermee kunnen we een procedure maken die kijkt of 
een getal deelbaar is door 3: 


EDIT ШЕЕ Н 
OUTPUT 0 = REMAINDER :n 3 


END 

Dit is het gevolg: DEEL 3807 
TRUE 
DEEL 998 
FALSE 


Er zijn ook Logo-opdrachten om getallen af te ronden: 


INT maakt van een getal een geheel getal door de decima- 
len te verwijderen: 


PRINT INT 6.2343 

6 

PRINT INT SQRT 55 
7 


ROUND rondt een getal af naar de dichtstbijzijnde gehele 
waarde: 


PRINT ROUND 6.12345 
6 
PRINT ROUND 6.50123 
4 


ABS Sommige Logo-versies bezitten ook nog een ABS- 
functie (o.a. Atari 520 ST Logo). De ABS-functie 
geeft de absolute waarde van een getal. 

Zoals bijna met iedere Logo-opdracht het geval is, 
kunnen we ook de opdracht ABS zelf maken. Daar- 
voor gebruiken we de volgende procedure: 


EDIT ”ABS :п 
DP IF:n < O E-:nJ Eind 
END 
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OP IF :n < 0 [~:n] [:n] wil zeggen: 
als :n kleiner is dan 0, geef dan als uitvoer -:n, anders (dus als 
:n groter dan of gelijk aan 0 is) geef :п. 

In andere Logo-versies moet zo'n ALS ... DAN ... ANDERS- 
opdracht (IF ... ELSE ... THEN) als volgt geschreven worden: 


Реп 0 ENEN OP e:n ELSE OP ag 


We zagen ze al eerder, de tekens < (kleiner dan) en > (groter dan). 
Ze worden steeds in de INFIX-notatie gebruikt, dus altijd tussen 
twee waarden. 


4.3 Talstelsels 


Dan gaan we nu kijken naar wat we talstelsels noemen. In ons huis- 
tuin-en-keukenrekenen maken we steeds gebruik van het tientallig 
(decimale) stelsel. Dat wil zeggen dat we ieder getal kunnen herlei- 
den tot een optelling van machten van 10. Zo kunnen we het getal 
826 schrijven als: 


8 * 10 tot de macht 2 + 
2 * 10 tot de macht 1 + 
6 * 10 tot de macht 0 


Жиегі” 100 + 2410 + 6 t 1. 


Binnen het decimale stelsel splitsen we een getal dus op in eenheden, 
tientallen, honderdtallen, duizendtallen, enzovoort. 

Nu is het decimale stelsel echter niet het enige talstelsel. We 
kunnen elk ...tallig stelsel gebruiken. Het achttallig stelsel bijvoor- 
beeld werkt niet met machten van 10, maar van 8. Willen we dus een 
decimaal getal in het achttallig stelsel schrijven, dan moeten we de 
machten van 8 kennen. 

Het decimale getal 75 kunnen we dan in het achttalig stelsel zet- 
ten: 


15 is groter dan 64 (8 tot de macht 2) maar kleiner dan 512 
(8 tot de macht 3) dus: 


15 = 1 * 64 (8 tot de macht 2) + 11 en 
11:18 €8tokde macht’ 1): + 3 en 
3 -3%1 (8 tot de macht 0). 


Aldus wordt het getal 75 in het achttallig stelsel uitgesproken als 
113. 
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Omdat we ieder getal kunnen herleiden tot een optelling уап 
machten van 8, zult u de cijfers 8 en 9 in het achttallig stelsel niet 
tegenkomen. Het cijfer 7 is het grootste cijfer in dit talstelsel. 


Nog een voorbeeld: 
Om het getal 1001 in het achttallig stelsel te schrijven gaan we als 
volgt te werk: 


De machten van 8 zijn: 1, 8, 64, 512, 4096 


1001 = 1% 512 (8 tot de macht 3) + 489 en 
489 =7 * 64 (8 tot de macht 2) + 41 en 
41. =5*8 (8 tot de macht 1) + 1 en 
1 SE e (8 tot de macht 0) 


Zo is het decimale getal 1001 in het achttallig stelsel 1751. 


Een ander talstelsel is het tweetallig (ook wel binaire) stelsel. Het 
tweetallig stelsel werkt met machten van 2: 1 2 48 16 32 64 128, 
enzovoort. Zo is 54 in het tweetallig stelsel: 


04 =1 * 32 (2 tot de macht 5) + 22 en 
22 = 1* 16 (2 tot de macht 4) + 6 en 
6 = 0 +8 (2 tot de macht 3) + 6 en 
б “ға (2 tot de macht 2) + 2 en 
2:-%%2 (2 tot de macht 1) + 0 en 
De Si (2 tot de macht 0) 
Kijk maar: 
8236186: 4.2 1 
EECH "EE 


Dus wordt 54 binair als 110110 geschreven. 


Zullen we binair eens tot 10 tellen? 


kA о OO NDJ i> ÇO tO = 
е JEF 3402: озығы он 
к 
= 
о 


0 


Zo kunnen we dus elk getal opschrijven als combinatie van enen en 
nullen. Zoals in het decimale stelsel een getal te schrijven is als een 
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optelling van machten van 10, zo is in het binaire stelsel een getal 
te schrijven als een optelling van machten van 2. 


Wanneer we van het getal 3 een binair getal maken, gaan we als 
volgt te werk: 


3 / 2=1 (еп 1 onthouden) 


Daarom zetten we ееп 1 onder de nulde macht van twee (de "еепһе- 
den’): 


07 168 08.9: 7 $ q Q Zb b 5 
1 2° 9% 99-92 akaf 
1/2-0 (еп 1 onthouden) 


Aldus krijgen we ook іп de volgende kolom, onder de eerste macht 
van 2 (de 'tweetallen') een 1: 


92:16 B. 4 2:1 
1:1 


Het decimale getal 3 wordt dus іп het tweetallig stelsel als 11 
geschreven, omdat 3 gelijk is aan: 


1 * 2 tot de macht 1 


KS? 
1 * 2 tot de macht 0 : 1*1 


2 en 
1 


Dit delen en onthouden уап de rest hoeven we niet zelf uit te reke- 
nen, dat kunnen we Logo ook laten doen. En wel met de volgende 
recursieve procedure, die we trouwens ook voor andere talstelsels 
dan het binaire stelsel kunnen gebruiken: 


KUIT "BASER n 

LP; pO 709 LOF "J 

OP WORD BASE2 CINT :n / 2) CREMAINDER INT :n е) 
END 


Opmerking. In sommige Logo-versies moet na de IF-opdracht steeds 
THEN gebruikt worden. De tweede regel van de procedure wordt 
dan: 


ЕСІР TARN UP 


Enkele kanttekeningen bij deze procedure 


- De procedure is recursief. 
- BASE2 deelt steeds het getal :n door 2, bepaalt hiervan het gehele 
deel (INT :n / 2) en onthoudt (in WORD) de rest (altijd 1 of 0). 
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Dit gebeurt met REMAINDER INT :п 2. 

- Tegelijkertijd roept BASE2 zichzelf weer aan. 

- Maar nu is de waarde van :n gelijk aan INT :n / 2. 

- Er is gebruik gemaakt van OP (OUTPUT) in plaats van PR, omdat 
het binaire getal niet in een keer berekend wordt, maar langzaam 
wordt opgebouwd. 


We kunnen уап deze procedure ook een BASES of een BASE6 maken 
om respectievelijk getallen in het асһі- of zestallig stelsel uit te 
rekenen. Let wel, dan moet ook :n door respectievelijk 8 en 6 
gedeeld worden. Of we kunnen het talstelsel variabel maken: 


EDIT "BASE :n :s 

IF е "О TDP "3 

OP WORD BASE CINT :n Z :s) e CREMAINDER INT :п en 
END 


Op deze manier hebben we alle talstelsels in één procedure. 
Andersom kan ook. Hier is de procedure die van een getal (in 
elk willekeurig stelsel) een decimaal getal maakt: 


EDIT ”BBASE :n :s 

IF emam СОЕ “Og 

DP C:s w BBASE BL : п :9) ЖСПАВБТ in 
END 


De variabele :n wordt hier gehanteerd om het te bewerken getal aan 
te geven. De variabele :s wordt gebruikt om het talstelsel aan te 
geven. 


Enkele voorbeelden: 


ТРК BASE B e 

1000 

PPR BASE B 3 

ER 

ТРК BASE В 3 

20 

PPR BASE 10029837 5 
10031423322 

ТРК BASE 328374535991002 7 
253611666354100100100002000010000 
TPR BASE 12 Б 

20 

ТРЕ BASE ВВ В 

130 

ТРК BASE 110 90 

120 
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ТРЕ BASE 75 B 

113 

? 

PPR BBASE 1000 2 

8 

PPR BBASE еге 3 

8 

ТРЕ BBASE 1234567839 8 
54481005 

P 

? 

Penzovoort , enzovoort 


44 Hexadecimale getallen (het zestientallig stelsel) 


Zoals gezegd kan Logo worden gebruikt voor de meest uiteenlopende 
rekenkundige bewerkingen. Bovendien is Logo zo gebruikersvrien- 
delijk, dat zelfs de meest ingewikkelde berekeningen in Logo betrek- 
kelijk eenvoudig te maken zijn. Dit heeft u in het voorafgaande kun- 
nen zien. 

Als laatste wordt nu behandeld hoe bijvoorbeeld het omrekenen 
van decimale naar hexadecimale getallen in Logo is te definiëren. 

Hexadecimale getallen worden in de computerwereld vaak 
gebruikt. Alle opdrachten in machinetaal bijvoorbeeld worden vaak 
als hexadecimale getallen geschreven. Zoals u weet zijn opdrachten 
in machinetaal de meest elementaire opdrachten die door de computer 
begrepen worden. Het hart van de computer, de CVE (Centrale 
VerwerkingsEenheid) wordt hier direct door aangesproken. 

Ons decimale stelsel kent de getallen: 0,1,2,3,4,5,6,7,8 en 9. 
In het zestientallig (hexadecimale) stelsel wordt gebruik gemaakt 
van: 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14 en 15. In het zestientallig 
stelsel is dus 15 het grootste cijfer, net zoals 9 het grootste cijfer 
is in het tientallig stelsel. 

Om de ‘cijfers! 10,11,12,13,14 en 15 door één teken voor te stel- 
len is gekozen voor de letters: А,В,С,р,Е en F: 


10 А 
11 B 
12 С 
18 D 
14 Е 
15 Е 


Gaan we bij het decimale stelsel uit van machten уап 10, 
bij het achttallig stelsel van machten van 8, 
bij het tweetallig stelsel van machten van 2, 

à 
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bij het hexadecimale stelsel gaan we uit van machten van 16. Dus: 


16 tot de macht 0 : waarde 1 (162) 
16 tot de macht 1 : waarde 16 (161) 
16 tot de macht 2 : waarde 256 (162) 
16 tot de macht 3 : waarde 4096 (16°), enzovoort. 


Zo is het hexadecimale getal 2D0: 


0*1 5,20 
D: * 18 = 13.* 16 = 706 
S * 250 = 512 
Dus 720 in het decimale stelsel 


Nog enkele voorbeelden: 


hexadecimaal 11 decimaal 17 (11 = 1*16 + 1) 

hexadecimaal 1А decimaal 26 (1А = 1*16 + 10) 
hexadecimaal Al = decimaal 161 (A1 = 10*16 + 1) 
hexadecimaal АВ = decimaal 171 (АВ = 10*16 + 11) 
hexadecimaal ЗЕ = decimaal 63 (ЗЕ = 3*16 + 15) 


Dat valt nogal mee! 
Nu kunnen we Logo ook de hexadecimale waarde van een getal 


laten berekenen. Hieronder volgende de procedures die we ervoor 
kunnen gebruiken. Voor het gemak is uitgegaan van decimale getal- 


len tussen 0 en 255. De procedure kan echter eenvoudig worden 
uitgebreid. Bekijk de procedures maar eens rustig. Vooral HEX is 
een belangrijke procedure, omdat hierin de berekeningen plaats- 

vinden. 


TO RG 
OP FIRST RL 
END 


TO HEXA 

із 

PR [Geef een getal tussen О - 2551 
MAKE ”П RG 

HEX :D 

END 


ТО ӘЛЕН EN 70 

ІР ЕПРТҮР : П OR 7] 

IF :N = 1 CUF РКЕ Et? 
OP МӨЛ М + 1 BE +Q 
END 
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TO HEX :D 
INIT 
MAKE "А ІМТ sB +/. .15 


IAN CH LIS б» 22--НЕХОЕТ 
MAKE В ph = 879 15 
ПАКЕТЫ ERT e + 1 <:ҢЕХСЕТ 


MAKE "Х WORD :H :L 
MAKE “XX WORD O :X 
PR С SE [Het decimale getal was :J :D 

PR С SE CHet hexadecimale getal is :J :XX 
ER. 3 

PR [Nog een getal J / N 7J 

MAKE "ANTW RC 

IF :ANTW =. ”7 CHEXAJ CSTOPJ 

END 


ТО INIT 
КӨКЕ ГЛЕХБЕТ LTD: P. S q S:B:7 B За uD HE? 
END 


De volgende procedures zijn gebruikt: 


RG 


HEX 


RG 
HEXA 
ITEM 
HEX 
INIT 


is een zeer belangrijke hulpprocedure. Hiermee wordt het 
te bewerken getal gelezen. RC zou hier niet werken, want 
RC (Read Character) leest maar één teken, terwijl een getal 
meestal uit meer tekens bestaat. RL werkt evenmin, omdat 
RL het getal in een lijst plaatst (en een lijst is niet reken- 
kundig te bewerken). RG is daarom een prima alternatief, 
en opnieuw een illustratie van het zelf in Logo opdrachten 
definiëren. 


A is de hoofdprocedure. Hiermee wordt de hele bewerking 
gestart. 


ITEM is een hulpprocedure, die we al eerder hebben besproken. 


HEX 


ITEM is hier nodig om het juiste hexadecimale teken uit de 
lijst HEXGET te halen. 


is de rekenkundige procedure waarvan de werking hieron- 
der wordt uitgelegd. 


INIT is een hulpprocedure waarin de variabele :HEXGET zijn 


waarde krijgt. De waarde van HEXGET is een lijst met alle 
hexadecimale tekens. 
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Werking van HEX 
Laten we als voorbeeld het decimale getal 42 nemen. 


- HEX 42 treedt in werking. :D heeft nu de waarde 42 (in HEXA) 
gekregen. 

- :А krijgt de waarde 2, want INT 42 / 16 is 2. 

- Voor :H wordt nu een hexadecimaal teken uit HEXGET gehaald, 
namelijk het derde teken (2 + 1); :H krijgt hier dus de waarde 2. 

- В krijgt de waarde :D (= 42) - А * 16 (= 32). Dit is nodig om 
de rest van de bewerking :D / 16 om te zetten in een hexadeci- 
maal getal. :B krijgt dus de waarde 10. 

- Voor :L wordt opnieuw een hexadecimaal teken uit HEXGET 
gehaald, ditmaal het elfde (10 + 1). Daarmee krijgt :L de waarde 
А 


- Nu moet ег nog een hexadecimaal getal worden gevormd van :H 
en :L. Hiervoor zorgt MAKE "X WORD H :L. 

- Om er nog een nul voor te zetten wordt tenslotte nog de variabele 
"ХХ gecreëerd. 


Tenslotte worden het gegeven decimale getal en zijn hexadecimale 
notatie keurig afgedrukt. 


Ter afsluiting van dit hoofdstuk nog een paar opmerkingen. 


Natuurlijk is het handig om in Logo ook rekenkundige bewerkingen 
te kunnen uitvoeren. We hebben gezien dat dit bovendien op een 
zeer gebruikersvriendelijke manier mogelijk is. Toch zullen we de in 
dit hoofdstuk genoemde opdrachten en procedures niet direct voor 
wiskundige en/of boekhoudkundige doeleinden gaan gebruiken. 
Voor wiskundige en boekhoudkundige toepassingen zijn andere com- 
putertalen veel geschikter. 

Toch is het aardig kennis te nemen van de rekenkundige moge- 
lijkheden уап Logo, al was het alleen maar ter illustratie van de ` 
logica уап de procedures. Zelfs ogenschijnlijk grote rekenkundige 
problemen worden in Logo opgesplitst in kleine (dus overzichtelijke) 
probleempjes. De hexadecimale procedures zijn hier een goed voor- 
beeld van. Voor velen zit hierin de Logica van Logo. 

Rekenkundige bewerkingen en rekenkundige opdrachten zullen 
we in dit boek regelmatig tegenkomen. 

- Bij de Logo-schildpadwereld: 


REPEAT  360-/”:НОЕК EFD ZIJDE RT; ҢОЕКЗ 
IF REMAINDER 350 ADEK Ze "0 ESTOPJ 


- Bij Logo-taal: 


IF NOT EQUALP FIRST :a FIRST :b COP CASCII FIRST :a) 
<°САБСІІ РІҚБТ br) 
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- Bij Logo-muziek: 
SEITEN O :А TOOT O 261 :B :С MAKE "А :A - 1 
- Bij Logo-sproken: 
EACH CSETSP CRANDOM 100) + 503 
Rekenkundige bewerkingen komen vaker voor dan u denkt! In alle 


Logo-werelden worden rekenkundige bewerkingen gebruikt, dus 
bestudeer dit hoofdstuk goed. 


Wi 


Hoofdstuk 5 


DE WONDERE WERELD 
VAN LOGO-MUZIEK 
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5.1 Inleiding 


De wereld van Logo-Muziek is wellicht de meest onbegrepen en 
minst gebruikte mogelijkheid van Logo. En dat is niet zo verwonder- 
lijk. Vele Logo-versies bieden namelijk weinig of geen mogelijkheden 
daartoe. 

De Atari 8-bits Logo, MSX Logo en Spectrum Logo hebben rela- 
tief weinig muziekmogelijkheden. De Atari 16-bits Logo kent hele- 
maal geen 'muziekwereld'. De Commodore Logo's, evenals de ВВС 
Logo's, echter geven de gebruiker vele muziekmogelijkheden. 

Het bovenstaande is echter geen reden om Logo-Muziek maar 
over te slaan. Uitgaande van de Atari LCSI Logo, die slechts twee 
opdrachten kent, wordt u in dit hoofdstuk getoond hoe op betrek- 
kelijk eenvoudige wijze 'geluid' gemaakt kan worden. 

Voordat we echter overgaan tot het tot stand brengen van 
geluiden is het zinvol eerst eens even stil te staan bij de vraag: 
Wat is geluid? Pas dan kunnen we onze 'eigen' geluiden gaan maken, 
met de Logo-hulpmiddelen (al dan niet groot in aantal) die in onze 
Logo-versie beschikbaar zijn. | 

Aan het einde van dit hoofdstuk treft u enkele praktische voor- 
beeldprocedures aan, alsmede de 'Turtle Music'. 

Maar eerst de belangrijke vraag: Wat is geluid? 


5.2 Wat is geluid? 
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Het beantwoorden van deze vraag is moeilijker dan u denkt. Het 
antwoord op deze vraag is namelijk in sterke mate afhankelijk van 
de persoon aan wie de vraag gesteld wordt. Een musicus, een bio- 
loog, een natuurkundige, een muziektherapeut zullen allen de vraag 
beantwoorden vanuit hun eigen subjectiviteit. 

Als we de waarneming door het menselijk oor buiten beschou- 
wing laten, is geluid niets anders dan een trillingsverschijnsel: 


- Een geluidsbron 'komt іп beweging' en veroorzaakt een trilling. 

Deze trilling wordt overgenomen door de omliggende materie (bij- 

voorbeeld lucht) en plant zich zo voort. 

Dit noemen we een golfverschijnsel. 

- Eventueel wordt deze trilling opgevangen door een trommelvlies, 
dat daardoor ook gaat trillen. 

- Aldus wordt een geluid ervaren, en eventueel prettig gevonden. 


Geluid kan een natuurlijke oorsprong hebben: golven, wind, blaf- 
fen, spreken. Geluid kan echter ook een mechanische oorsprong 
hebben: instrumenten of machines bijvoorbeeld. 

Geluid, ongeacht waar het vandaan komt, heeft een aantal 
belangrijke kenmerken: 


De sterkte (het volume) 
De hoogte 

De duur 

De klankkleur 

Het klankverloop. 


Td w N н 


Willen we nu op mechanische of elektronische manier geluiden voort- 
brengen, dan zullen we de genoemde kenmerken moeten kunnen 
beheersen en controleren. Zoals gezegd is geluid, technisch gespro- 
ken, niet meer dan een trillingsverschijnsel. 

De gevoelswaarde, dat wil zeggen of een geluid mooi, lelijk, 
rustgevend, verstorend of opzwepend is, wordt bepaald door het 
menselijk bewustzijn, en is dus een relatief begrip. De gevoelswaar- 
de van een bepaald geluid is voor ieder mens weer anders. 


Samenvattend: geluid is een fysische trilling in de tijd. 
Onder dit trillingsverschijnsel verstaan we de trillingen ofwel de 
geluidsgolven die via de lucht ons gehoorzintuig bereiken. 


Laten we de kenmerken van geluid eens bekijken: 


1. De sterkte van een geluid wordt bepaald door de grootte van de 
geluidsgolven. De maximale uitwijking van de geluidsgolven 
wordt ‘amplitude! genoemd. Naarmate de uitwijking groter is 
wordt een ‘harder’ geluid waargenomen. De meetwaarde voor 
geluidssterkte wordt decibel genoemd. Een en ander ziet u in 
het diagram op de volgende bladzijde. 
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volume —- 


Jeton 


СА И е tijd in sec, orem 
een periode 
of trillingstijd 


2. De hoogte van een geluid wordt bepaald door het aantal trillingen 
per seconde. U ziet dit in het bovenstaande diagram. We spreken 
hier over de frequentie van een geluid. De meetwaarde voor fre- 
quentie is hertz (Hz). Zo wordt toon A voortgebracht bij 440 
trillingen per seconde. We zeggen dan dat deze toon een frequen- 
tie van 440 Hz heeft. 

3. De duur van een geluid wordt bepaald door de tijdsduur waarbin- 
2 пеп de trillingen plaatsvinden. Hoe lang de trillingen waarneem- 
baar zijn (het geluid hoorbaar is) hangt in sterke mate af van 
het volumeverloop enerzijds en van het waarnemingsvermogen 

van de luisteraar anderzijds. 

4, De klankkleur van een geluid wordt bepaald door de vorm van 
de geluidsgolf. Elke golfvorm heeft een verschillende 'harmo- 
nische inhoud'. Een 'harmonische trilling' geeft een zuivere toon 
van één frequentie. Vaak horen we echter niet slechts deze 
grondfrequentie, maar tevens hogere en lagere frequenties. 
Onder harmonische inhoud wordt nu verstaan de verhouding van 
deze frequenties onderling en de verhouding tot de grondfre- 
quentie. Zo is bij een grondtoon van 440 Hz (we noemen dit de 
eerste harmonische frequentie) de frequentie van 880 Hz de 
tweede harmonische frequentie. 

We onderscheiden de volgende golfvormen : 

- de harmonische golfvorm (elektronisch) 

- de zaagtand golfvorm (o.a. viool, hoorn) 

- де vierkants- (of blok-) golfvorm (o.a. klarinet, xylofoon) 

- de puls golfvorm (o.a. piano, hobo) 

- de driehoeksgolfvorm (o.a. fluit) 

Zoals u ziet heeft ieder instrument een eigen karakteristieke golf- 
vorm. De namen уап de golfvormen zijn afgeleid уап hun grafi- ` 
sche afbeelding. 

5. Het klankverloop van een geluid wordt bepaald door de tijd waar- 
in het volume van een geluid aanzwelt en afneemt. Het klankver- 
loop van een geluid (іп het Engels ‘envelope! geheten) wordt ook 
wel de ‘omhullende van het signaal! of 'transiënt' genoemd. 
Meestal worden in het verloop van een klank vier fasen onder- 
scheiden: 
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1. Het aanzwellen van een klank tot het maximale niveau. De 
meest gebruikte term hiervoor is Attack. 
2. Het vervallen van het volume tot het 'nagalmvolume'. We noe- 
men dit de Decay. 
. Het nagalmen van de klank. We noemen dit de Sustain. 
. Het uitsterven van de klank. We noemen dit de Release. 


> со 


Een en ander ziet u in het onderstaande diagram. 


Attack Release 


———ж е. 


Decay ! Sustain 
| 


volume 


Laten we als voorbeeld eens een op de piano aangeslagen toon nemen. 
We onderscheiden dan: 


De Attack : Bij het aanslaan van de toets wordt in zeer korte tijd 
een vrij hoog volumeniveau bereikt. 
De Decay : Dit volume wordt echter niet vastgehouden, maar zakt 


terug (vervalt) tot het 'nagalmvolume'. 
De Sustain : Het nu bereikte volume wordt gedurende langere of 
kortere tijd vastgehouden. 
De Release : Tenslotte loopt het volume van de toon sterk terug 
totdat de toon niet langer hoorbaar is. 


Iedere klank (ongeacht van welke geluidsbron) heeft een specifiek 
verloop. Zo verschilt het klankverloop van een toon voortgebracht 
op een piano nogal met het verloop van een klank voortgebracht op 
een orgel. Het klankverloop уап een toon gespeeld op twee уег- · 
schillende piano's kan zelfs nog verschillen. De bouw (van het 
instrument), het gebruikte materiaal, de grootte en de vorm van 
het instrument zijn bepalend voor het klankverloop. 

Soms ligt het klankverloop (en daarmee voor een groot gedeelte 
ook de ‘kleur! уап de klank) vast іп het instrument. 

Een tambourijn biedt minder mogelijkheden dan een saxofoon of 
een gitaar. Dat komt doordat het klankverloop op de twee laatstge- 
noemde instrumenten beter te controleren en te beheersen is. 

Indien op een elektronisch instrument als een synthesizer klan- 
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ken worden gemaakt, kan behalve de golfvorm ook het klankver- 
loop worden bepaald. Met de ADSR (Attack, Decay, Sustain en 
Release) regeling kunnen dan zowel klanken met een 'korte! uitsterf- 
tijd (bijvoorbeeld orgel) als klanken met een 'lange' uitsterftijd (bij- 
voorbeeld piano) worden gemaakt. Door de karakteristieken van 
een klank te beheersen kan bijna ieder geluid worden geprodu- 
ceerd. 

De computer, met Logo als programmeertaal, heeft die mogelijk- 
heden niet. Dat komt doordat we met Logo niet alle karakteristieken 
van een klank kunnen beheersen en controleren. 


Laten we eens zien hoe we de genoemde geluidskenmerken vanuit 
Logo kunnen beheersen en controleren. 


1. De sterkte van het geluid 
2. De hoogte van het geluid 
3. De duur van het geluid 


Deze drie kenmerken zijn vanuit Logo volledig te controleren. Zij 
vormen de basis van het muziek-maken vanuit Logo. In $5.3 zullen 
deze kenmerken worden besproken en zal worden behandeld hoe ze 
vanuit Logo te beheersen en te controleren zijn. 


4, De klankkleur van het geluid 


Slechts weinig Logo-versies beschikken over de mogelijkheden om 

dit geluidsaspect te beheersen. Het is een moeilijke (en theoretische) 
materie, die maar voor een klein gedeelte van de Logo-gebruikers 
interessant is. Daarom wordt er hier niet verder op ingegaan. 
Gebruikers van bijvoorbeeld de Commodore Logo's vinden in hun 
handleiding voldoende aanwijzingen om hiermee te experimenteren. 


5. Het klankverloop van een geluid. 


Hoe dit belangrijke geluidsaspect kan worden beheerst lezen we in 
55.4, Daar komen we de 'Envelope Shaper' tegen. De 'Envelope 
Shaper' biedt in sommige Logo-versies de mogelijkheid het klankver- 
loop van een geluid te beheersen. 


We vatten dit stukje theorie nog even kort samen. Voordat we, met 
de computer, een geluid willen produceren, moeten we ons afvragen: 


Hoe hard moet het geluid zijn? 
Hoe hoog moet het geluid zijn? 
Het lang moet het geluid duren? 
. Hoe moet het geluid klinken? 


A сә МЫ = 


Pas wanneer we deze factoren Киппеп beheersen kunnen we met 
behulp van de opdrachten in Logo trachten een klank te produceren. 
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53 Muziek maken met Logo 


Dit boek is weliswaar bestemd voor gebruikers van verschillende 
Logo-versies, maar toch gaan we in het bijzonder in op de muziek- 
opdrachten van de Atari LCSI Logo. Hoewel in diverse Logo-versies 
soms andere primitieven bestaan, is het ook mogelijk dat opdrach- 
ten met gelijke werking soms anders heten (bijvoorbeeld SOUND). 

De muziekwereld van Logo is de wereld van de frequenties, van 
notenwaarden en van de Envelope. 

Atari LCSI Logo beschikt over twee muziekopdrachten. Dat is 
niet bepaald veel. Mensen die met Atari Logo werken zullen dan ook 
soms wel jaloers zijn op de mensen die met Commodore of BBC Logo 
werken. Toch zult u ontdekken dat zelfs met slechts twee muziek- 
opdrachten nog erg veel muziek te maken is. De twee Logo- 
opdrachten zijn: 


TOOT en SETEN V 
TOOT is de opdracht die een geluidskanaal opent. In Atari Logo 


zijn (zonder het gebruik van machinetaal) twee geluidskanalen 
beschikbaar. In BASIC zijn er maar liefst vier geluidskanalen 
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‘direct! te gebruiken. Deze geluidskanalen roepen we met respectie- 
velijk een 0 of een 1 aan. 

De opdracht TOOT vraagt om vier invoergegevens. U weet het, 
toetsen we alleen TOOT in en geven we daarna RETURN, dan zegt 
Logo ons dat de boodschap niet begrepen wordt: 


NOT ENOUGH INPUTS TO TOOT 
Dus moeten we iets aan TOOT toevoegen. En wel het volgende: 
TOOT :stem :frequentie :volume : lengte 


- Het eerste invoergegeven is de stem, het geluidskanaal. We kun- 
nen hier kiezen tussen het eerste (0) of het tweede (1) geluidska- 
naal. 

- Het tweede invoergegeven is de frequentie, de hoogte van de toon. 
In dit hoofdstuk vindt u een frequentietabel. De toon A heeft bij- 
voorbeeld een frequentie van 440 Hz. 

- Het derde invoergegeven is het volume van de toon (maximaal 15). 
Hoe hoger het getal, hoe groter het volume van de toon. 

- Het vierde invoergegeven tenslotte bepaalt de duur van de toon. 
Deze tijdsduur (een getal tussen 0 en 255) wordt aangegeven in 
eenheden van 1/60 seconde. Geven we een toon dus een duur van 
90, dan zal deze toon anderhalve seconde duren. 

Zo geeft 


1007 1 ччО 1039 


een toon uit het tweede kanaal, met een hoogte van 440 Hz, een 
volume van 10 en een duur van een halve seconde. Een A dus. 
Wat zou u denken van de procedure A? 


EDIT CA 
TOOT O 440 10 30 
END 


Nu is voor het laten horen van de toon A het aanroepen van de pro- 
cedure, die ook A heet, voldoende. 

Op dezelfde manier als de procedure A gemaakt is zouden we 
de hele toonladder kunnen afwerken: 


CDEFGABC 


Maar nu zien we dat er tweemaal een toon met dezelfde naam voor- 
komt. Als u meer dan één oktaaf definieert, krijgt u nog meer dub- 
bele namen. En u weet dat het іп Logo onmogelijk is om twee ргосе- 
dures met dezelfde naam tegelijk in het geheugen te hebben. Daar- 
om zullen we de ene procedure bijvoorbeeld C en de andere C2 moe- 
ten noemen. 

Ook is het verstandig om in de procedures variabelen te hante- 
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ren. Een voorbeeld: 


SREL СОЗ : DUUR 
ТООТ О 1045 :VOLUME DUUR * 15 
END 


Zoals u ziet is in deze procedure zowel het volume als de duur varia- 
bel. Omdat het in de meeste muziekstukjes niet zinvol is om voor 
iedere toon steeds opnieuw het volume te bepalen, kunnen we de 
variabele :VOLUME aan het begin van het muziekstuk zijn waarde 
geven. Wanneer we in het muziekstuk een 'zacht' gedeelte krijgen, 
kunnen we de waarde in de procedure nogmaals bijstellen. Voorbeel- 
den hiervan vindt u verderop in dit hoofdstuk. 

Let op. Omdat de waarde van :DUUR in de procedure met 15 
vermenigvuldigd wordt, duurt C3 4 een volle seconde, 

Het schrijven van een procedure voor iedere toon is echter niet 
de enige manier om muziek te maken. Het is ook mogelijk om bepaal- 
de gegevens: de frequentie, het volume en/of de duur, in een lijst 
te zetten. Een voorbeeld: 


MAKE “GEGEVENS [349 3438 523 523 587 587 5231 


EDIT "”KORTJAKJE :GEGEVENS 
IF ЕМРТҮР :GEGEVENS [STOP] 
MAKE “TOON FIRST :GEGEVENS 
TOOT 0 :Т00М 10 30 

KORTJAKJE BUTFIRST :GEGEVENS 
END 


Dit is een heel kort en heel eenvoudig voorbeeld, maar het gaat om 
het principe. 

Zoals gezegd kunnen we ook bijvoorbeeld de duur van de noten 
in een gegevenslijst zetten. U kunt dat op twee manieren doen: 


- twee aparte lijsten maken: een met de frequentiegegevens en een 
met de gegevens voor de toonduur: 


MAKE “HOOGTE [349 523 587 5231 
MAKE ”DUUR СЗО БО 30 151 


Een procedure kan er dan zo uitzien: 


EDIT ”LIED :HOOGTE : DUUR 

IF ОЕ ЕМРТҮР :HOOGTE EMPTYP :DUUR Г5ТОР3 
MAKE ”Н FIRST :HOOGTE 

MAKE ”D FIRST :DUUR 

TOOT O :H 15 :D 

LIED BF "RBE xD 

END 
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- één lijst maken, waarbij ieder element twee gegevens bevat (hoog- 
te en duur): 


MAKE "GEGEVENS [ [339 3020589 602587 3021523 1522 
Пе procedure ziet ег dan zo uit: 


EDIT "LIED :GEGEVENS 

IF ЕМРТҮР :GEGEVENS Г5ТОР1 
MAKE "H FIRST FIRST :GEGEVENS 
MAKE ”D LAST FIRST :GEGEVENS 
TOOT Or HEID 

LIED BF :GEGEUENS 

END 


U ziet het, mogelijkheden te over. 

U kunt zelf bepalen welke methode u hanteert. Beide methoden 
(voor iedere toon een procedure maken of de gegevens voor de 
tonen in een lijst zetten) hebben hun voordelen. 


Hieronder vindt u de tabel met de frequentiewaarden van de ver- 
schillende tonen. 


Opmerking. Er zijn minieme verschillen in frequentiewaarden moge- 
lijk. Ga dit na voor uw eigen computer. 


Tabel met frequentiewaarden van de verschillende tonen 


С =261Hz 0 = 391 Hz Cis2 = 554 Hz G2 = 783 Hz 
Cis = 277 Hz Gis = 415 Hz D2 =587Hz Gis2 = 830 Hz 
D =293Hz А = 440 Hz Dis2 = 622 Hz A2 = 880 Hz 
Dis = 311 Hz Ais = 466 Hz E2 = 659 Hz Ais2 = 932 Hz 
E =329Hz В = 493 Hz F2 = 698 Hz B2 = 987 Hz 
Е = 349 Hz С2 = 523 Hz Fis2 = 739 Hz СЗ = 1046 Hz 
Fis = 369 Hz 


Laten we maar eens een muziekstukje maken om een en ander in 
praktijk te brengen. We gaan het bekende liedje Altijd is Kortjakje 
ziek op twee manieren programmeren. Kijkt u maar: 


1. Iedere noot heeft een eigen procedure 
We hebben de volgende noten nodig: F G A Ais C2 D2. Iedere pro- 


cedure moet twee variabelen bevatten: de toonduur en het volume. 
De procedure D2 ziet er dan zo uit: 


121 


EDIT "Пе : DUUR 
2901 G- -970 :VOCUME : DUUR * 15 
END 


En nu het lied: 


EDIT ”KORTJAKJE 

MAKE. “VOLUME 15 

FETE LER We ӘР EBS CE ч 

Ее інін Ais 1 Ais Та e n e G P бе ғ. ч 
MAKE “VOLUME 10 

KEFEN: E КСС ТОР Ais 2 Ais e A RAR B 43 
MAKE “VOLUME 15 

о Pm be Ee Les Басе De B: CE A 

ПІВ l Ais 1 Risk AIS TARAeGeEGBEFr ч 
END 


U ziet het: de waarde van :VOLUME wordt gedurende het muziek- 
stuk gewijzigd. Dit kan zonder problemen. Het is een van de voor- 
delen van het op deze manier muziek maken. 

Wanneer we de benodigde 'toon'-procedures eenmaal hebben, 
kunnen we ook zeer snel een volgend muziekstuk maken. 

Natuurlijk zitten er ook nadelen aan deze manier van muziekpro- 
cedures maken. Het is eigenlijk een nogal omslachtige manier. Laten 
we eens naar methode 2 kijken. 


2. Bij deze methode gebruiken we maar één procedure, namelijk 


EDIT "LIED :GEGEVENS 

IF BHP1YP : : GEGEVENS (STOP 

MAKE “HOOGTE FIRST FIRST : GEGEVENS 
MAKE "VOLUME FIRST BF FIRST :GEGEVENS 
MAKE "DUUR LAST FIRST : GEGEVENS 

TOOT 0 :HOOGTE :VOLUME : DUUR 

LIED ВЕ : GEGEVENS 

END 


Met deze procedure kunnen we ieder gewenst eenstemmig muziek- 
stuk maken. Het enige wat we moeten doen is steeds de gegevens- 
lijst vullen met nieuwe informatie. 

De gegevenslijst bevat zoveel elementen als er noten zijn. Ieder 
element bevat dus de informatie over één noot. Deze informatie 
betreft de hoogte, het volume еп de duur van de noot. Ieder ele- 
ment van de gegevenslijst bevat dus drie elementen. 

Deze elementen worden in LIED als volgt benoemd: 


: HOOGTE = het eerste element van het eerste element 
(FIRST FIRST) 

:VOLUME = het middelste element van het eerste element 
(FIRST BF FIRST) 

:DUUR = het laatste element van het eerste element 
(LAST FIRST) 
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Het eerste element ziet er dan zo uit: 


LR LS 30] 


U ziet, de hoogte is 349 Hz (ееп Е), het volume 15 en de duur 30. 


Dit is 


MAKE 
La? 
ГЧББ 
р: 
C466 
свед 
[440 
С 5079 
ГЧББ 
EN 


dan de volledige gegevenslijst voor Kortjakje: 


"GEGEVENS CCMS SORES 15 BOE Ee 3, 18- 307 


301587 
15J[ 456 
30J[ 331 
30J LC466 
ét KE SECH 
3011391 
301587 
15J[ 456 
39222391 


301587 
15J[ 4656 
3012348 
золгччо 
ЗО1ГЧББ 
БОЗГЗЧЗ 
301587 
15J[ 4656 
30JC 349 


с заса 
15ЈЕЧЧО 
6012523 
золгччо 
30J[ 456 
кка] 343 
301[523 
ded 340 
5011 


БОЛГЧББ 
олчоо 
о заа 
30112391 
З01гЧЧ0 
30225123 
60JC 466 
30JL 440 


Wanneer we deze gegevens invoeren in de procedure LIED, is het 
resultaat het liedje Altijd is Kortjakje ziek. | 

En als we een ander muziekstukje willen maken? Dat is geen 
enkel probleem. We maken gewoon een nieuwe gegevenslijst met 
nieuwe informatie. We kunnen de procedure LIED blijven gebruiken. 
Dit is een zeer handige methode om met Logo muziek te maken. 


5.4 Meerstemmige muziek met Logo 


Zoals al eerder is vermeld, beschikt Atari LCSI Logo over twee 
geluidskanalen die ieder apart, maar ook tegelijk aangeroepen kun- 
nen worden. Tot nu toe hebben we ons steeds beperkt tot het eer- 
ste geluidskanaal. Dat riepen we aan met 0. Nu komt het tweede 
geluidskanaal (register zo u wilt) erbij. Dat kanaal roepen we aan 
met het cijfer 1. 
Indien u met losse 'toonprocedures! wilt werken, dus voor iedere 
toon een eigen procedure wilt maken, zult u ook voor de tonen uit 
het tweede register eigen procedures moeten maken. De 'toonproce- 
dures voor het eerste kanaal waren: 


С Cis D Dis E F Fis G Gis A Ais В C2 Cis2 D2 Dis2 Е? F2 bis? 
G2 Gis2 А2 Ais2 В2 C3 


De 'toonprocedures! voor kanaal 1 zou u dan als volgt kunnen 
benoemen: 


с cis d dis e f fis g gis a ais Б c2 сіѕ2 d2 dis2 e2 f2 Dei 
g2 gis2 a2 ais2 b2 c3 
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Een procedure voor het eerste kanaal krijgt (of had reeds) de 
opdracht 


TOOT 0 
en een procedure voor het tweede kanaal krijgt de opdracht 
TOOT 1 


Nu zullen er dus 25 nieuwe procedures geschreven moeten wor- 
den. Deze nieuwe procedures zijn echter bijna gelijk aan de reeds 
gemaakte toonprocedures voor kanaal 0. U hoeft alle procedures dus 
niet weer opnieuw te schrijven. Er is een handiger manier, waarbij 
u de reeds geschreven procedures gebruikt, kijkt u maar: 


1. Roep eerst de procedure С in de Editor met EDIT "С. 

2. Verander in de Editor de naam van de procedure (van С naar с) 
en het geluidskanaal (van 0 naar 1). 

3. Verlaat de Editor met de ESC-toets (voor Atari). 

4. We hebben nu zowel de procedure С als de procedure с. 

5. Doe dit met alle toonprocedures. 


Als we nu tweestemmig muziek willen maken moeten we de geluids- 
kanalen om de beurt aanroepen. Dat gaat op deze wijze: 


C2e2C 2с2Е2е2Е272С4с4 


Als u goed luistert hoort u wel twee geluidskanalen (het geluid is 
wat voller), maar de 'muziek! is nog niet tweestemmig. Het geluid 
wordt pas tweestemmig als we twee verschillende noten tegelijk laten 
spelen, als een harmonisch interval: 


СОЕТРТЕРТО 2 82082462 


Het resultaat hiervan is een tweestemmige regel. 

Dit is één mogelijkheid om tweestemmig te werken; er is echter 
nog een andere manier. Ook hier kunnen we namelijk de informatie 
weer in een lijst plaatsen. | 

Willen we de gegevens voor tweestemmige Logo-muziek іп ееп 
lijst zetten, dan zijn er verschillende mogelijkheden: 


1. We maken één lijst waarbij ieder element zes gegevens bevat: 
- de toonhoogte van de toon uit kanaal 0 
- het volume van de toon uit kanaal 0 
- de duur van de toon uit kanaal 0 
- de toonhoogte van de toon uit kanaal 1 
- het volume van de toon uit kanaal 1 
- de duur van de toon uit kanaal 1 
Als u ор deze manier werkt bent u echter snel "де draad kwijt!', 
want het geheel is niet erg overzichtelijk. 
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2. We maken twee lijsten, één met alle gegevens voor kanaal 0 en 
één met alle gegevens voor kanaal 1. 
Deze lijsten zien er dan zo uit: 


МАКЕ "DEGEUENS. U CCSS: 49 SMEER 75 30223812 15 307 
62125 15. 30024 

MAKE ”GEGEVENS:T TEEM I0 dk 10: 3032363293 20-303 
сел 10. 3053 


Еп ook de procedure ziet er een beetje anders uit dan voor eenstem- 
mige muziek: 


EDIT “ІЛТЕПСО :GEBEDENS.O :GEGEVENS..1 
IF OR ЕПРТҮР 4 ЗЕБЕМЕМЕ;Ы PHPIYP GEGEVENS 1  CSTOPJ 


MAKE "HD FIRST FIRST :GEGEVENS.O 
МАКЕ "HD FIRST BF FIRST :GEGEVENS.O 
MAKE "П,0 LASI. FIRSI::GEGEVENS.O 
MAKE ”H.1 FIRST FIRST ТӘЕБЕМЕМЗ.12 
MAKE ”U.1 FIRSL BF: FIRSP :OEGEVENS .1 
MAKE ”П.1 LAST FIRST :GEGEVENS.1 
TODT O GHO уо тие 

TUGI ан Туа EH Zar 

LIED BF :GEGEVENS.O ВЕ :СбЕСбЕМЕМ5.1 
END 


Er zijn natuurlijk nog meer manieren om de gegevens in een lijst 
vast te leggen en deze er door de procedure LIED2 weer uit te laten 
halen. U kunt bijvoorbeeld een gegevenslijst maken waarbij het 
eerste element de gegevens bevat voor de eerste toon uit kanaal 0, 
het tweede element de gegevens voor de eerste toon uit kanaal 1, 
enzovoort. Maar daar gaan we hier niet verder op in. 


Met behulp van de zojuist beschreven werkwijze en met gebruikma- 
king van de procedures uit dit hoofdstuk kunt u naar hartelust ех- 
perimenteren met Logo-muziek. 

We zijn er echter nog niet. We hebben het nog slechts over één 
muziekopdracht gehad. Het Logo-woord SETENV hebben we nog 
helemaal niet besproken. 


5.5 Het klankverloop beheersen met de Епмеіоре Shaper’ 


Met de opdracht SETENV kunnen we het klankverloop (de envelope) 
van een toon beheersen en controleren. SETENV is de afkorting van 
SET ENVelope. 
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555 
53555555 


Natuurlijk kunnen ме met de opdracht TOOT alleen ook wel 
muziek maken. Voor iedere toon kunnen we met TOOT het geluids- 


kanaal, de hoogte, het volume en de duur bepalen. Toch klinkt 
alles dan nog wat monotoon. Iedere toon blijft (zolang hij duurt) 


geen "епуеіоре!. 


en de opdracht SETENV kunnen we hier 


5 


, € 


steeds op één volumeniveau. Ег is geen verloop 


! 


Met de "Епуеіоре Shaper 


iets aan veranderen. 


Weet u nog hoe het verloop van een toon eruit zag? 


tijd — 


I Release 


Sustain 


Decay 


Attack 


— Əumr[oA 
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Meteen па de aanslag een hoog volume : Attack 
daarna iets teruglopend : Decay 

tot een min of meer constant niveau : Sustain 
en tenslotte uitstervend : Release 


Opmerking. We zullen in deze paragraaf verder de Engelse termen 
gebruiken. Bij Nederlandstalige Logo-versies zijn deze termen veel- 
al verschillend vertaald. Malmberg Logo (Commodore) gebruikt de 
volgende vertaling: 


Attack : Het aanzwellen 
Decay : Het vervallen 
Sustain : Het nagalman 
Release : Het uitsterven 


Het zou prettig zijn als we ook in Logo de mogelijkheden hadden om 
het klankverloop zo uitvoerig te beheersen. Sommige Logo-versies 
hebben inderdaad geweldige mogelijkheden hiervoor. 

De meeste Logo-versies echter moeten het met minder mogelijk- 
heden doen, en kunnen daarom de Attack, de Decay, de Sustain 
en de Release niet apart instellen. SETENV is echter een redelijk 
alternatief. 

In Atari LCSI Logo zijn de Attack en de Decay niet door 
SETENV te beinvloeden. Met de opdracht SETENV kunnen we 
slechts de Sustain en de Release regelen. Om precies te zijn: 
met SETENV bepalen we het punt waar de Sustain overgaat in de 
Release, We kunnen ook zeggen: met SETENV bepalen we hoe lang 
een toon, op vol volume, hoorbaar moet zijn en hoe lang de uitsterf- 
tijd van een toon is. Dit heeft niets met de duur van een toon te 
maken. Kijk maar eens naar de volgende twee grafieken: 


Sustain Release Sustain Release 


| І 


—— 


volume 
volume 


tijd = tijd == 


Laten we aannemen dat dit de grafieken zijn van de toon A. De lin- 
kergrafiek toont een A met een lange Sustain, terwijl de rechter- 
grafiek juist een korte Sustain laat zien. De twee tonen klinken dan 
ook verschillend, hoewel ze dezelfde specificaties kunnen hebben: 


hoogte: 440 Hz volume: 15 duur: 30 
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De eerste grafiek echter laat een A zien die vrij lang hoorbaar is 
en dan vrij plotseling uitsterft. De toon is zeker 18 van de 30 een- 
heden hoorbaar. Daarna zakt de toon in zeer korte tijd snel in volu- 
me omlaag. We spreken hier van een lange Sustain en een korte 
Release. 

De tweede grafiek laat eveneens een A zien, met dit verschil 
dat deze toon slechts kort hoorbaar is. De Sustain van deze toon is 
erg kort. De Release, de uitsterftijd, echter is erg lang. 

In muziektermen kunnen we zeggen, dat tonen met een lange 
Sustain 'legato' klinken (dat is: verbonden) en tonen met een korte 
Sustain 'staccato'. 

Het moment nu waarop de Sustain overgaat in de Release kun- 
nen we met SETENV regelen. We zullen dit moment (waarop de 
Sustain overgaat in de Release) s/r.punt noemen. De opdracht 
SETENV gebruiken we zo: 


SETENU :geluidskanaal :s/r.punt 


Het eerste invoergegeven is het geluidskanaal waarvoor het klank- 
verloop wordt bepaald. Hier kan dus een 0 of een 1 worden inge- 
vuld. Het tweede invoergegeven is het moment waarop de Sustain 
moet overgaan in de Release: het s/r.punt. Dit kan een getal zijn 
tussen 0 еп 127. ` 

Het beste kunnen we ееп en ander illustreren met ееп muziek- 
voorbeeld. Het is een betrekkelijk eenvoudige procedure die u een 
muziekstukje laat horen en daarbij aangeeft wat de SETENV-waarde 
is. Deze SETENV-waarde verandert telkens als het muziekstukje 
opnieuw begint. Zo kunt u het duidelijke verschil horen tussen 
SETENV 0 125 en SETENV 0 5. Geef om de procedure te starten 
een іпуоегререуеп: de beginwaarde van de 'Envelope Shaper'. 


MAKE “GEGEVENS [[S5e3 10 102ГБӘВ 10-1011653 10 101 
Қосар 10169899 20 501887 10 ӚЗГЕРЗ 10 5053565 10 51 
сяле со Make LESCH STAT: 103391 19 1024123299: 10 2057 


EDIT "TEST : INVOER 

IF :INVDER = ”O [STOPJ 

PR CSE [De SETENV waarde is :1 : INVOER 
СЕТЕМУ O : INVOER 

LIED : GEGEVENS 

MAKE "INVOER : INVOER - 5 

TEST : INVOER 

END 


Let op: als verkleiningsfactor voor de waarde van de Envelope 
Shaper is 5 gekozen. U kunt dit vanzelfsprekend aanpassen aan uw 
eigen wensen. Begin de procedure dus met een 'hoge' SETENV- 
waarde. De procedure "TEST zal dan het in :GEGEVENS opgeslagen 
melodietje blijven spelen en iedere keer de waarde van de Envelope 
Shaper verminderen. 
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Omdat TEST recursief is gaat dit proces door totdat de waarde 
van de variabele :INVOER gelijk is aan 0. Door nu de Envelope 
Shaper als invoer een 0 te geven maken we hem inactief. 


Twee meerstemmige muziekvoorbeelden 


Laten we eens gaan kijken naar enkele voorbeelden van meerstem- 
mige muziek. Het eerste is een voorbeeld van een muziekprocedure 
die gebruik maakt van afzonderlijke 'toonprocedures!'. Het tweede 

muziekstuk is een voorbeeld van een procedure met een gegevens- 
lijst. | 


1. Vous quidonnez de l'amour (1730) 


Dit is het eerste gedeelte van een oud Frans volkswijsje. Let hierbij 
vooral eens op de steeds veranderende SETENV-waarde. Een lage 
SETENV-waarde wordt gebruikt om noten, op gelijke hoogte, die 
elkaar opvolgen ook als afzonderlijke noten te laten klinken. Een 
hoge SETENV-waarde wordt gebruikt om noten, op gelijke hoogte, 
die elkaar opvolgen ‘verbonden! te laten klinken. Bij een zeer hoge 
SETENV-waarde klinken twee korte (gelijke) noten zelfs als één 
lange noot! ` 

Hier volgen de muziek en de procedure. 


EDIT *”L.AMOUR 

MAKE “volume 10 

SETENU О 100 БЕТЕМУ 1 100 

Aere eega: pis BEE AG 

fe EMS E ш R Aë zn 

SETENU 0 5 

Ғе 421 E 1955 F ШД 

ais 1 

SETENU О 100 

FEN et S p Е 

SETENU 0:5 BETENY 1 5 
1 


ЕГЕТТЕ ТИТЕ ТЕ а 161 
3 | 
SETENV О 100 5ЕТЕМУ 100 


D 
ru 
D 
к= 
т Л Tu 
ru MU a 
w ao Tu 
пу) MO 
Mm > r 
EM D 
а DN 
EN DP 
DI 
П) 


SETENU O O SETEN 
da d 59! 
q 1 R Ë 
SETENU Ог S 
Ais 1 g 

% 


Е 
F 


1 
= 
1 ñ 
3 


als 
G 1 
ETEN 
EQ 


у 
1 
e 
у 
1 


Opvallend in deze muziekprocedure is het feit dat ееп kwart-noot 
als twee achtste-noten genoteerd wordt. Een notatie als: 


G 2 ë tft 


is in dit geval namelijk niet mogelijk. De tonen zullen dan om de 


beurt en niet tegelijk worden gespeeld. Daarom wordt ееп en ander 
als volgt genoteerd: 


Әлекеіі1 


U ziet, de lange С wordt als het ware іп tweeën gespeeld, maar 


door nu de SETENV hoog te kiezen (of o 


twee aparte noten. 


2. Het Menuet 'La Marguerite! 


р 0 te zetten) hoort u geen 


La Marguerite is een Franse dans uit 1730 еп werd oorspronkelijk 
geschreven voor doedelzak en viool. Dit is de muziek: 


matig snel 


rn тзт 


En dit zijn de gegevens: 


MAKE “GEGEVENS.O [C523 10 103C523 10 101598 10 гој 


(659 
[455 
[343 
C261 
Sei 
ГЧББ 
L 245 


2оЈЕБ9В 
1OJL HHO 
10ЈЕЗЧ9 
10ĲJ[ 349 
10J[ 349 
101ГЧЧ0 
10113981 


201гБ53 
10J[ 456 
1091359 
1017391 
1012391 
1011391 
101ГЧЧ0 


101Г5Н7 
103440 
202С2%8 
101ГЧЧ0 
101ГЧЧ0 
10J[ 3493 
101ГЧ5Б 


101523 
2011391 
101Г25Б1 
10JC440 
10ĲJ[ 456 
ааа 
TUBE 


` 
а < = жз Leg өт у 2 


101 
20 
107 
103 
101 
101 
5011 
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MAKE ”GEGEVENS.1 ГГЧЧО 10 101ЕЧББ 10 102ГЧЧ0 10 207 
[331 10 201C440 10 20113981 10 1011391 10 101150000 е 101 
50000 2 101523 10 101523 10 101 C698 10 207 


L659 
жк. 
CHO 
(ері 
510 
L329 


20JC698 
10ĲJ[ 456 
10523 
10JC261 
1011391 
6013 


1012598 
1011450 
LOIL SEI 
102373 
1011331 


Dit is de gebruikte procedure: 


1012553 
10ĲJ[ 440 
103L 323 
10213931 
102343 


1012587 
1011ЧЗ0 
1011323 
10J[ 440 
102343 


EDIT ”MARGUERITE :GEGEVENS.O :GEGEVENS,1 
IF OR ЕМРТҮР :GEGEVENS.O ЕМРТҮР :GEGEVENS.1 [STOP] 


MAKE "Н.О FIRST FIRST :GEGEVENS.O 
MAKE "U.O FIRST BF FIRST :GEGEVENS.O 
MAKE ”D.O LAST FIRST :GEGEVENS.O 
MAKE ”Н.1 FIRST FIRST :GEGEVENS.1 
MAKE ”У.1 FIRST BF FIRST :GEGEVENS.1 
МАКЕ ”0.1 LAST FIRST :GEGEVENS.1 


SETENU O 3 бЕТЕМ 1 100 
{г зз O HLO: VD НУ 


TOOT 


kred 


М;2 


:0.1 


MARGUERITE ВЕ :GEGEVENS.O ВЕ :GEGEVENS.1 


END 


U ziet het, іп een muziekprocedure als deze wordt de opdracht 


SETENV weinig toegepast. De SETENV-waarde blijft gedurende het 
gehele muziekstuk gelijk. 

In de gegevens van de afzonderlijke noten worden echter de 
accenten aangegeven. Dit zijn de accenten voor de eerste noten in 
een maat (aangegeven door een iets hoger volume). Dit volume loopt 
langzaam terug bij de volgende noten in dezelfde maat. 


5.6 Tot besluit: Turtle Music 


Ter afsluiting van dit hoofdstuk over het muziek-maken met Logo 
nog het programma Turtle Music. Het is een betrekkelijk eenvoudig 
programma om muziek mee te maken. Op het scherm wordt dan ook 
een pianoklavier getekend. Dit gebeurt met de volgende procedures: 
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TO Ve 
ЕКЗБООГОТОСОКТ 90 
END 


TO ZWARTE. TOETS 
KEER D EFN 30 SETX XCOR + 1 BK 203 ET 90 FD S RI 
g0 

END 


TO :TOEIS 
КЕГЕРІ е CFD SO RT 80 FD 10 RT 803 
END 


TO KLAVIER 

Spa DS 7? CS CT 55 

ЅЕТРС О 0 

НІ ГО: SEZPUS: 677953 713 

PD REFERI 31 ГТТОЕТӘСЕГ 30 FBR 10 LT 303 

РО-ЗЕТРОБ LL35 ЧОЛ КІ 1080 PD 

REPEAT Ч CREPEAT е CZWARTE.TOETSJ Ус REPEAT З GEEWA 
RIE, TOETS) VRJ 

REPEAT с (ZWARTE. TOETS) 


Hierna wordt de procedure LEER aangeroepen. Deze procedure 
vraagt om een naam voor de te spelen 'melodie' en roept dan op 
zijn beurt de procedure NEEMOP aan. 

NEEMOP beschouwt iedere gespeelde noot als een element waar- 
mee de lijst :melodie wordt gevuld. :melodie wordt dus de variabele 
die alle noten van het gespeelde bevat. 

De noten worden via het toetsenbord gespeeld met kleine let- 
ters. Voor de verhoogde noten worden HOOFDLETTERS gebruikt. 
Bijvoorbeeld: de noot f wordt gespeeld als u intoetst: Ғ; 

de noot f# wordt gespeeld als u intoetst: F (SHIFT f). 

Met ZET wordt de Turtle op de juiste toets van het klavier 
geplaatst. ZW maakt de Turtle zwart (voor op de witte toetsen). 
WI maakt de Turtle wit (voor op de zwarte toetsen). 

Dit zijn de procedures: 


ТМ LEER 

TELL O ST SETPOS:L-B 03 SETH О 

CT SS PR CHoe komt uw melodie te heten 71 
MAKE “naam RW 

MAKE “melodie ГЈ 

NEEMOP 

MAKE THING “naam :melodie 

END 
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TO NEEMOP 
MAKE ”T RC 
IF :T = CHAR 


Зе CIOP] 


HOKEE 7м FO TAKE "9 KO 


СЕТЕМУ O 0 
NOTEN :Т 
CEE EL 


MAKE ”melodie LPUT :T :melodie 


NEEMOP 
END 


10 NGIEN 23 
гт = CHAR 


IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :Т = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF : TOCHAR 
IF :T = CHAR 
END 

IU Er eel 

IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
IF :T = CHAR 
END 

TO RW 


ОР токот RE 
END 


SATO S51 -U LJ 
бё КЫЫЛ. U Or? 3V e 
400 KA) Eet e E? 
59 CIOM ОЗЕ: : 0:64 
1901 ETUDE 0:369: tlr 12 


` LOS ECKE, ЗМИ ни: ЕЈ 


LO EH Юта: L 32 
LUS $ 102 b aSk :U L] 


TE Krt Driel 
козе hie O SI NV TLJ 
Өз LIGT Ө :У :LJ 
SO LENE Зу  e 
CF GINGE ОНЕУ ги Э 


ӘВ-ІВЕТР а Od ZU 
ALARA БИЗ 154 WIJ 
100 ІЗЕТРОБ 14, 07 ew 
BR ГБВЕТРПЕ LE 152 WIJ 
102 LSEIPUR L11 01 el 
102 СЭСІРӘЗ LEL- 091 20] 
79 LSPSPOS COB: 152 WIJ 
103 ТӘСІРЕБЕ Cal MÄI eh? 
ée "eg, 1539 JAJ Aia 
ЗИ, andrea 0d AWJ 
о LEE GIR 33592 WIJ 
ЧӨ LSEA4PUS 51-07 EWI 
CA RORIS LOL 73 GUJ 
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TO WI 
JS e sët, 
END 


ТО ZW 
ЗЕІС O 
END 


Zoals u waarschijnlijk reeds had ontdekt wordt het ‘opnemen! beëin- 
digd met de spatietoets (= CHAR 32). 

Na het ‘opnemen! van een melodie kan deze vanzelfsprekend ook 
weer beluisterd worden. Dat gebeurt door de procedure SPEEL. 
Toets daarvoor, na het opnemen, SPEEL :naam in. Vanzelfsprekend 
dient u hierbij de naam op te geven van de melodie die gespeeld 
moet worden. 

Op deze manier zijn vele melodieën op te nemen en af te spelen. 

Denkt u eraan voor de naam van de melodie een : te plaatsen? 
Anders antwoordt Logo: 


1 DON'T KNOW HOW TO naam 


Een dubbele punt wil zeggen dat :naam geen procedure maar een 
variabele is. 
Dit is dan de procedure SPEEL: 


TO SPEEL :melodie 
IF EMPTYP :melodie [STOP] 
MAKE "U 10 MAKE "L 10 


СЕТЕМУ O 0 

MAKE ”T FIRST :melodie 
NOTEN :T 

СЕР ТТ 

SPEEL ВЕ :melodie 

END 


Zoals al opgemerkt is dit een betrekkelijk eenvoudig programma met 
niet zo heel veel mogelijkheden. Het volume, de toonduur en de 
instelling van de Envelope Shaper zijn niet variabel maar liggen 
vast. Met dit programma als uitgangspunt kunt u er echter wel iets 
van maken. Logo biedt u hier mogelijkheden genoeg voor. 

Veel plezier! 


Hoofdstuk 6 


DE WERELD VAN DE LOGO-SPROKEN 
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6.1 Sproken, wat zijn dat? 


Wie heeft er wel eens van sproken gehoord? Spoken ... ja; sprook- 
jes ook ... maar sproken? Veel computer-enthousiasten zullen u 
niet kunnen vertellen wat sproken zijn. 

Zijn sproken dan zo exclusief voor Logo? Niet echt, want ook 
mensen die in BASIC of machinetaal programmeren kennen ze. Zegt 
de term 'Player Missile Graphics! of 'Ѕргіїеѕ' u meer? Dat zijn die 
kleine figuurtjes op het beeldscherm: rondrijdende autootjes, rond- 
rennende mannetjes/vrouwtjes, vliegtuigjes, helicoptertjes, raket- 
ТӨШ; 2, 

Heeft u wel eens geprobeerd Sprites te maken vanuit BASIC? 
Iedereen die deze vraag bevestigend kan beantwoorden weet dat 
het een hele klus is. Daar komt nog bij, dat Sprites, in BASIC 
geprogrammeerd, vaak - niet altijd - traag zijn in het bewegen en 
schokkerig reageren. Dit is niet het geval bij in machinetaal gepro- 
grammeerde Sprites. Iedereen kent ze wel: de razendsnelle compu- 
terspelen in de meest fantastische kleuren. 

Welnu, Sprites kunnen we ook met Logo maken. En wel op een 
zeer gebruikersvriendelijke manier. 

Deze Logo Sprites, die we voortaan gewoon sproken zullen пое- 
men, hebben enkele belangrijke kenmerken: 


- Er kan met meerdere sproken tegelijk (en onafhankelijk van 
elkaar) worden gewerkt. Atari LCSI Logo beschikt over vier 
sproken, BBC en Commodore over meer. 

- Sproken zijn eenvoudig te ontwerpen. 

- Atari LCSI sproken zijn gedetailleerd: geen 8 maar 16 bytes. 

- Sproken zijn eenvoudig te bewegen: via toetsenbord, joystick of 
paddle. 

- Sproken kunnen met POKE-waarden groter of kleiner worden 
gemaakt. 

- Sproken kunnen vele kleuren aannemen (bij Atari 128! ). 

- Sproken kunnen alle vormen aannemen, uw eigen fantasie of 128 
beeldpunten is de grens. 

- Er is een uitgebreide lijst voor het opsporen en vermijden van 
botsingen. In Logo wordt dit 'Collision Detection! genoemd. Maar 
daarover later meer. 


Eigenlijk is een Logo-sprook niets anders dan de Logo-schildpad in 
een ander jasje. Willen we de Logo-schildpad ‘verkleden! als auto, 
paard, rots, vogel of vrachtwagen? Dat is geen enkel probleem. Met 
Logo-sproken is iedereen in staat zijn/haar eigen computerspelen te 
maken. Vooral wanneer Logo-sproken worden gecombineerd met 
Turtle-Graphies, met Logo-taal en/of met Logo-muziek zijn er bij- 
zonder aardige dingen mee te doen. 

Zullen we eens gaan kijken hoe een sprook wordt gemaakt ? 
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6.2 Het maken en ontwerpen van sproken 


= > : 
z |——— — — 
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Bij Atari LCSI Logo kunnen maximaal vijftien sproken (door vier 
Turtles) tegelijk worden gebruikt. De zestiende sprook is de Turtle 
zelf. 

Sproken maken en ontwerpen doen we in een raster van 128 
hokjes. Dit raster, dat de 'Shape Editor! wordt genoemd, is uw ont- 
werpblad. Door het inkleuren/openlaten van de hokjes in het raster 
maakt u een sprook. 


Opmerking. Ook hier zal de Engelse naam worden gebruikt. Shape 
Editor is een Logo-begrip dat moeilijk te vertalen is. 


De Shape Editor roepen we op met de opdracht: EDSH (= Edit 
Shape). EDSH moet gevolgd worden door een getal (1-15). 

We willen nu de eerste sprook ontwerpen, dus toetsen we 
EDSH 1 in (en RETURN). Dan verschijnt dit op het beeldscherm: 
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We zijn nu in de Shape Editor. U ziet het raster (8 x 16 = 128 hok- 
jes), uw 'tekenvel'. U kunt uw eigen sprook ontwerpen. Het ont- 
werp mag wat grof lijken, het uiteindelijke resultaat, de sprook, is 
vele malen kleiner. 

Hoe kan een sprook er nu uitzien? Hieronder ziet u enkele figuren 
uit een spel dat we ooit eens gemaakt hebben. Het spel heette: Het 
Grote Yama Avontuur, en de drie afgebeelde figuren speelden hier- 
in een grote rol. Het waren: Pegus, het paard; het tekenduiveltje 
en Luut, de Loper. U kunt zich wel voorstellen dat er heel veel ver- 
schillende figuren ontworpen kunnen worden. 

Later in dit hoofdstuk zult u zien hoe u ook letters en cijfers 
kunt maken. Ja, zelfs hoe u de letters en cijfers uit het ROM-geheu- 
gen van uw computer kunt halen en in de Shape Editor kunt stop- 
pen. 


Het lijkt misschien een nadeel dat sproken in een rechthoekig raster 
ontworpen moeten worden. Zo zou u alleen rechtopstaande figuren 
kunnen maken. Maar ... ook in Logo hebt u de beschikking over 
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de POKE-waarden van uw computer. Met behulp van de juiste POKE- 
waarde maakt u de sprook breder. 


Opmerking. De opdrachten breder, smaller, groter en kleiner zitten 
standaard in een aantal Logo's. Het werken met POKE-waarden is 
hierbij niet nodig. 


De opdracht om een waarde te 'рокеп' is .DEPOSIT. Deze opdracht 
vraagt om twee invoergegevens: 
- de geheugenplaats die wordt aangeroepen 
- de waarde die in de geheugenplaats wordt gezet. 
Denkt u om de stip? 

U weet dat iedere computer beschikt over andere geheugenplaat- 
sen. Als voorbeeld volgen hier de .DEPOSIT-waarden voor de Atari: 


„DEPOSIT 53256 1 (of 3) maakt Turtle/sprook 0 breder 
.рЕРОЅІТ 53257 1 (of 3) maakt Turtle/sprook 1 breder 
.DEPOSIT 53258 1 (of 3) maakt Turtle/sprook 2 breder 
.DEPOSIT 53259 1 (of 3) maakt Turtle/sprook 3 breder 


Indien u met een andere dan de Atari 8-bits computer werkt, zoek 
dan de juiste POKE-waarden voor uw computer in uw handleiding 
op. De genoemde POKE-waarden zijn uiteraard dezelfde als die voor 
de Sprites worden gebruikt. 

Om weer naar de juiste grootte terug te keren zet u in de 
genoemde geheugenplaatsen een 0. 


Als we een sprook ontworpen hebben verlaten we de Shape Editor. 
Bij Atari doen we dit met de ESC-toets. Op dat moment zit de vorm 
opgeborgen in het werkgeheugen van de computer. Met de opdracht 
SETSH 1 (SETSHape) vertellen we de Turtle(s) die we het laatst ` 
aangeroepen hebben, de zojuist ontworpen vorm aan te nemen. 

Het is verstandig om de sprook een naam te geven. Door het 
geven van een naam kennen we alle gegevens van de ontworpen 
sprook toe aan een variabele. 

De opdracht die de gegevens voor ons uit de Shape Editor haalt 
is GETSH. Indien u een sprook ontworpen hebt en u typt: 

PR GETSH 1, krijgt u een lijst met zestien getallen; dit zijn de 
gegevens van de eerste sprook. 

Met de volgende opdracht kennen we de gegevens toe aan een 
variabele: MAKE "VORM GETSH 1. Іп de variabele :VORM bergen 
we, eenvoudig gezegd, alle informatie op die nodig is om sprook 1 
te maken. 

Als we dit gedaan hebben, kunnen we de gegevens rustig weg- 
schrijven op band/diskette of printer. Wanneer op een later tijdstip 
de gegevens weer van band/diskette ingelezen worden, moeten we 
de waarde van de variabele als het ware 'terughalen' naar de Shape 
Editor. Dat doen we met de opdracht PUTSH aldus: 

PUTSH 1 :VORM . 
Met GETSH halen we als het ware de gegevens dus uit de Shape 
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Editor en met PUTSH stoppen we de gegevens weer in de Shape 
Editor. U begrijpt nu wel, dat in de Logo-sprokenwereld EDSH, 
SETSH, GETSH en PUTSH heel belangrijke opdrachten zijn. 


Het is hierboven al gezegd: een sprook kunt u beschouwen als een 
Turtle іп een ander јаѕје'. Met een sprook kunt u dan ook dezelfde 
dingen doen als met de Turtle. Sproken kunt u: 


- een kleur naar keus geven met SETC (gevolgd door een kleurnum- 
mer 

- een snelheid naar keuze geven met SETSP (gevolgd door een snel- 
heid. De invoer moet hier een getal tussen -200 еп 200 zijn. Bij 
een negatieve snelheid beweegt de Turtle/sprook achteruit. 


Opmerking. In tegenstelling tot de Turtle zelf (sprook 0 dus) kun- 
nen we de vorm van een sprook niet draaien. Wel kunnen we een 
sprook van richting laten veranderen. 


- besturen met bijvoorbeeld de joystick. Hiervoor is slechts een 
kleine procedure nodig waarbij we gebruik maken van SETH 
(SET Heading). Met SETH draaien we de Turtle/sprook іп de aan- 
gegeven richting. De waarde van de variabele :richting wordt in 
de procedure bepaald door de uitvoer van de joystick in poort 0. 


EDIT ”BEWEEG 

MAKE ”richting JOY О 

IF CER ter SSES EN 99 
IF : Pd ORT iert "ТЕСКЕН 903 
IF- згісһедтес" FW. ESSTI 18913 
ІҒ :riehting 6 CSE h @ 2702 
WHEN 32: STOP  SETSP-: ОЛ 

ЅЕТӘР: БО 

BEWEEG 

END 


Opmerking. Sommige Logo's kennen deze procedure als een hulp- 
programma op schijf. 


U ziet het, deze recursieve procedure zorgt ervoor dat de sprook 
of de Turtle zich verplaatst en reageert op de beweging van de joy- 
stick. De uitvoer van de joystick kan zijn: 


omhoog 
rechts-omhoog 
rechts 
rechts-beneden 
beneden 
links-beneden 
links 
links-omhoog 


‘pustpositie'! -1 


TEEN 
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Bovendien ziet u in de procedure de opdracht WHEN 3 [STOP 
SETSP 0] staan. Met WHEN activeren we een 'WHEN-DEMON', Later 
komen we hierop terug. De bedoeling is in ieder geval dat de Turtle 
stopt als de vuurknop op de joystick wordt ingedrukt. 

Nu willen we de Turtle/sprook besturen via het toetsenbord. 
Dat is heel eenvoudig: 


TO ВЕШЕЕСе 

MAKE “richting RC 

IF srichting = DM CSETM 01 

IF ‘richting = "A CSETH 1801 

ІН: rr teORting = "R CSETH 903 

IF :rienteng = "L CSETH 2707 

IF ‘eieheing * "S [SEISP 0 STUP] 
ГИ SQ 

BEWEEG2 

END 


U ziet, nu wordt de waarde van de variabele :richting bepaald door 
de RC-opdracht. 


6.3 Een sproken-bibliotheek 


Het kan erg handig zijn om een soort 'sproken-bibliotheek' aan te 
leggen: een verzameling sproken ingedeeld naar vorm en functie. 
Iedere keer bij het programmeren kunt u hier dan gebruik van 
maken. Hier volgt stap voor stap hoe u dit kunt doen. 


Het opzetten van een sproken-bibliotheek 


1. Ontwerp op papier enkele sproken. Gebruik hiervoor een ont- 
werpblad zoals achter in dit hoofdstuk is bijgevoegd. 

2. Zet de sproken in de Shape Editor met de opdracht EDSH. 

Let op: u kunt bij Atari niet meer dan vijftien sproken tegelijk 
verwerken. 

3. Geef de zojuist ontworpen sproken een naam met GETSH. Zorg 
dat u later aan de naam kunt zien welke sprook het is. 
Bijvoorbeeld: MAKE "auto.vooruit GETSH 1 

MAKE "auto.rechts GETSH 2 
enzovoort. 

4. Sla de sproken op band op met SAVE "C: of op diskette met 
SAVE "D:bestandsnaam. Kies voor het bestand een herkenbare 
en met de bedoelde sprook verband houdende naam, bijvoor- 
beeld: SAVE "D:VOERTUIG. 001. 
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9. Haal alle variabelen uit het geheugen ор met ERNS (ERase 
Names). 

6. Type RECYCLE; dit verwijdert alle typefouten e.d. uit het 
geheugen. 

7. Herhaal de stappen 1 t/m 6 zo vaak u wilt. 


Op deze manier kunt u vele honderden sproken maken en op een 
diskette opslaan. 

Als u later gebruik wilt maken van deze sproken, doet u het 
volgende: 


- Kijk eerst welke sprokenverzamelingen beschikbaar zijn; met 
CATALOG "D: krijgt u een opgave van de diskette-inhoud. 

- Kies een groep sproken en laad deze met LOAD "D:bestandsnaam 
of met LOAD "C: . 

- Kijk met PONS welke sproken er in de geladen groep staan (PONS 
staat voor Print Out NameS). 

- Kies de sproken die u wilt gebruiken; 

- Verwijder de sproken die u niet gebruikt uit het geheugen met 
ERN :naam. 

- Zet de gegevens van de te gebruiken sproken in de Shape Editor. 
Doe dit met de opdracht PUTSH, bijvoorbeeld: 
PUTSH 1 auto rechts, 

- Als dit allemaal gedaan is, zijn de sproken gereed om gebruikt 
te worden. 


Opmerking. Natuurlijk kunnen er veel meer dan vijftien sproken 
in een bestand staan. Het is echter nogal onoverzichtelijk om veel 
sproken in één bestand te zetten. Bovendien moeten ег, als u er 

maar één of twee nodig hebt, dan ook zo veel verwijderd worden. 
In de praktijk blijkt een bestand met vijftien sproken juist handig 
in het gebruik te zijn. 


6.4 Animatie met sproken 


In 86.2 zagen we hoe sproken in beweging gezet kunnen worden 
met de opdracht SETSP, met de joystick of via het toetsenbord. Bij- 
zonder interessant wordt het wanneer we animatie gaan toepassen. 
Animatie is de techniek van het snel achter elkaar laten zien van 
verschillende vormen (vergelijk tekenfilms), zodat 'beweging' wordt 
gesimuleerd. 

Ook bij het toepassen van animatie bij sproken hoeven we niet veel 
anders te doen dan: 


1. enkele sproken te ontwerpen die samen een 'beweging maken', 
sproken dus die veel op elkaar lijken; 
2. deze sproken heel kort na elkaar te laten zien. 
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Dat lijkt heel eenvoudig nietwaar? En in feite is het dat ook. Kijkt 
u maar eens naar de volgende drie eenvoudige figuurtjes. Het zijn 
sproken zoals iedereen ze kan ontwerpen. Natuurlijk kunt u voor 
een animatie ook meer dan drie sproken gebruiken. Hoe meer spro- 
ken, hoe vloeiender de ‘beweging’. 


Er zijn verschillende manieren om de animatie in een procedure vast 
te leggen. Belangrijk is in ieder geval, dat de procedure recursief 
is. De beweging moet zich immers herhalen. Eventueel zou u van de 
opdracht REPEAT gebruik kunnen maken. 

We nemen аап dat bovenstaande sproken 1, 2 еп 3 genummerd 
zijn. Dan kunnen we de volgende opdracht samenstellen: 
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SEISH 1 WAIT 3 BEISA Е WAIT 2 SCISH 3 URIT 9 


Wanneer deze belangrijke opdracht in ееп recursieve procedure 
komt te staan, gebeurt het volgende. De Turtle neemt vorm 1 aan, 
wacht 1/20 seconde (= 3/60), neemt vorm 2 aan, wacht weer, neemt 
vorm 3 aan, wacht weer, en neemt dan, omdat de procedure recur- 
sief is, opnieuw vorm 1 aan. 

Dit zou zo'n procedure kunnen zijn: 


EDIT “ANIMATIE, 

TELL О 31 Pu SETSP -S90 
SETSH 1 МАРТ 3 

SETSH 2 WAIT 3 

ЗЕТЕН 3 WME 3 
АМІМАТІЕ.1 

END 


Eleganter is natuurlijk: 
MAKE "VOCM: 1 


EDIT "ANIMATIE.1 

IF :vorm = "H CMAKE "vorm 11 
TELL Q. ST. PU :SE1SP S0 

SETSH :vorm WAIT 3 

MAKE “vorm :vorm + 1 
АМІМАТІЕ.1 

END 


U begrijpt dat beide procedures precies dezelfde werking hebben. 
De laatste procedure is vooral geschikt voor animatie met 'veel! 
sproken. 

Wilt u een animatie met, laten we zeggen, vijf sproken maken, 
dan kan het ook zo: 


EDIT ”ANIMATIE.1 

MAKE "”vorm 1 

REPEAT 5 CSETSH :vorm MAKE ”уогт :vorm + 1 WAIT 31 
MAKE “vorm H 

REPEAT H CSETSH :vorm MAKE “vorm :vorm — 1 WAIT 31 
ANIMATIE.1 

END 


Ziet u wat in deze laatste procedure bijzonder is? De volgorde waar- 
in de vormen op het beeld worden gebracht is: 


1 2 3:45: doie? sh enzovoort 
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en niet, zoals bij eerdere procedures: 
124-172 rd: ensevoorts 


U ziet dat de mogelijkheden erg uitgebreid zijn en dat de sproken 
wel bijzonder gebruikersvriendelijk zijn. 


Kijkt u eens naar deze drie sproken: 


Gecombineerd leveren zij een aardig plaatje van een 'jogger' op. 
Denkt u eraan: u moet eerst LT 90 intypen voordat u de jogger in 
beweging zet. De figuurtjes suggereren namelijk een beweging van 
rechts naar links. U kunt LT 90 niet in de procedure zetten, want 
dan zal de jogger, omdat de procedure recursief is, blijven rond- 
draaien. 


Erg handig bij het maken van sproken voor een animatie is de pro- 
cedure COPYSH. COPYSH, te gebruiken als een opdracht (ееп ` 
Logo-primitief), kopieert een vorm. En dat is erg gemakkelijk. 
Zoals u ziet zijn de verschillen bij bovenstaande sproken erg klein. 
Het verschil zit in de armen en de benen. Wat doen wij dus: 


- sprook 1 ontwerpen 
COPYSH 1 2 intypen 
- sprook 2 zijn eigen vorm geven 
COPYSH 1 3 intypen 
- sprook 3 zijn eigen vorm geven. 


COPYSH levert een aanzienlijke tijdwinst op, zeker bij het maken 
van meer sproken, en blijkt een handige hulpprocedure te zijn. U 
vindt de listing verderop in dit hoofdstuk. 


Sproken worden nog interessanter wanneer u 'WHEN-DEMONS' 
inschakelt. Denk eraan: dit kan lang niet bij elke Logo-versie. 
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6.5 Ouer СоШѕіоп’ еп МҺеп-Оетопѕ’ 


Hoewel When-Demons niet exclusief voor Atari Logo zijn, kunnen 
we toch vaststellen dat slechts weinig Logo-versies over deze moge- 
lijkheid beschikken. In de Nederlandstalige MSX Logo worden ze 
‘demonen! genoemd. Wat zijn When-Demons dan precies? 

U zou de When-Demons kunnen bekijken als een soort 'oppas- 
sers! in de wereld van de sproken. Eenmaal geactiveerd blijft een 
When-Demon waakzaam. Een When-Demon wacht ..... Hij wacht op 
iets heel specifieks. 

De 21 beschikbare When-Demons wachten allemaal op iets anders. 
leder heeft zijn eigen taak. Er is bijvoorbeeld een When-Demon die 
wacht totdat de vuurknop (van de joystick) wordt ingedrukt. Er 
is ook een When-Demon die oplet of Turtle 0 wellicht in aanraking 
komt met een lijn, getrokken door pen nummer 0. Er is een andere 
When-Demon die pas in actie komt als Turtle 0 en Turtle 1 met 
elkaar in botsing komen. Er is zelfs een When-Demon die, eenmaal 
geactiveerd, iedere seconde zijn opdracht uitvoert. 

Zolang er niets gebeurt zijn de When-Demons ogenschijnlijk 
inactief, maar vergis u niet. Zodra zich een gebeurtenis voordoet 
waar een When-Demon voor geactiveerd is, treedt hij in werking. 
De When-Demon doet dan wat u hem heeft opgedragen. 

Als voorbeeld nemen we de, hierboven al genoemde, When- 
Demon die op de vuurknop van de joystick let. We activeren hem 
door in te typen: 


WHEN 3 


Deze When-Demon is nummer 3. Deze activeringsopdracht is echter 
niet volledig. Als we een When-Demon activeren moeten we ook zor- 
gen voor een opdracht; een opdracht die moet worden uitgevoerd 
als de genoemde When-Demon zijn gebeurtenis bespeurt. Een volle- 
dige activeringsopdracht kan dus zijn: 


WHEN З CPR CNu heeft и dus de vuurknop ingedrukt) 
Het kan ook anders: 

WHEN 3 CST PD REPEAT Ч ГРО: 300 AT 8033 
Het maakt allemaal niet uit. 


Opmerking. De opdracht WHEN kan slechts worden gebruikt bij 
SS (Split Sereen) of FS (Full Sereen). 


U kunt de When-Demons allerlei soorten opdrachten geven: teken- 
opdrachten, printopdrachten, geluidsopdrachten, animatieopdrach- 
ten, enzovoort. Deze opdrachten kunt u aan 21 verschillende When- 
Demons geven. 
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De When-Demons zijn te verdelen in drie groepen: 


1. When-Demons die letten op een confrontatie (ook wel botsing of 
‘Collision! genoemd) tussen een Turtle en een getekende lijn; 

2. When-Demons die letten op een confrontatie tussen twee Turtles, 
of sproken natuurlijk; 

3. When-Demons die letten op wat genoemd wordt: NON TURTLE 
EVENTS. Voorbeelden zijn When-Demons die letten ор: de vuur- 
knop, positie van de joystick. We noemden ook reeds de When- 
Demon die, eenmaal geactiveerd, iedere seconde zijn opdracht 
uitvoert. 


Zoals u ziet is deze laatste When-Demon wel erg actief. Het is een 
aparte When-Demon met vele mogelijkheden. Wat zou u zeggen van 
een secondenteller: 


БО TRE AD ШИНЕМ 7 CPR :X MAKE IX- :X + 1. ETI 


Deze ‘one-liner! maakt ор uw beeldscherm een secondenteller. Toe- 
gepast in een procedure maakt u uw eigen Logo-klok. 


Lijst van When-Demons 


Opmerking. Zoals u ziet is de lijst gemaakt in vier kolommen. In de 
eerste kolom staat het nummer van de When-Demon. In de tweede en 
de derde kolom staat op welke confrontatie de When-Demon let. Dit 
kan zijn: een confrontatie tussen een Turtle en een pen of tussen 
twee Turtles onderling. In de vierde kolom staan de 'Non Turtle 
Еуепіѕ', of wat er moet gebeuren от de When-Demons nr. 3, 7 en 
15 te activeren. Om redenen die de auteur van dit boek niet bekend 
zijn wordt When-Demon nr.11 niet gebruikt. 


De lijst is afgedrukt op de volgende pagina. 


Opmerking. Het is mogelijk om meer When-Demons tegelijk te acti- 
veren. Ze zullen echter niet tegelijk actief zijn. 

Hun oplettendheid en activiteit wordt bepaald door hun kracht. 
When-Demon 0 is de sterkste en daarmee ook de snelste 'Demon'. 
When-Demon 21 is de minst sterke en daarmee ook de traagste. 
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Lijst van When-Demons 


When-Demon: Turtle: Pen: Gebeurtenis: 


О О О 

ЕЗ oa E et 
re Caen ñ R ашы 
a ы n Uuurknop in 
ло Ear Жара еи ак 
ЕТЕ 1 oo - 
ла ы {зу к ёш у чуи 
ge Elke seconde 
е а н Кы а Ан 
азу о P. I ss =. 
ID: ылайы ый М WHET шой 
ie Niet gebruikt 
e pe eeen n un dk 
(ыла; de Ұй Кол Йылы 
ака р 252 Es о у 
а Joystick роз. 


16 3 О 

Мм ОИ 
B 
ез, a E 
ar у EE 
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Nu willen we weten wat we met deze When-Demons kunnen doen еп 
hoe we ze in een procedure kunnen activeren. Kijkt u eens naar dit 
eenvoudige voorbeeld: 


TO LIJN 
токы Meet Pu FS 
Fu S RT 90 ГО FD ЧОО PU 


HOME 

Ек SU КІ-90 PD FD ЧОО PU 
HOME 

MAKE ”Х О 

STARTTURTLE 

END 


TO STARTTURTLE 

Fe: Si TIO БЕТЕР O HOME- STOPI 
АЗЫ 51: PU 

БЕТЕР 100 

WHEN О CRT 180 MAKE ”Х :X + 1J 
STARTTURTLE 

END 


U weet wat er gebeurt: Turtle 0 tekent boven en onder op het 
scherm een lijn, maar zal deze nooit passeren. De geactiveerde 
When-Demon (nr.0) zorgt er namelijk voor, dat de Turtle zich, na 
het aanraken van de lijn, 180 graden draait. Eveneens verhoogt de 
When-Demon de waarde van :X met 1. U begrijpt dat :X een functie 
heeft als teller. Zodra de waarde van :X = 10 is, stopt de recursie- 
ve procedure. 

Om de When-Demon te activeren hoeven we niet gebruik te maken 
van een recursieve procedure. Eenmaal geactiveerd blijft de When- 
Demon zijn werk doen. De werking noemen we dan ook 'global' (alge- 
meen) en niet 'local' (plaatselijk). Als ме de When-Demon in de niet- 
recursieve procedure LIJN hadden geactiveerd, was de werking 
gelijk geweest. We maken echter voor de teller gebruik van recur- 
sie. 

Ook in het volgende voorbeeld wordt gebruik gemaakt van recur- 
sie, uitsluitend voor de testopdrachten: 


TO ALCATRAZ 

POO REFERMI Ч CPD 75 RI 302 
PU PU SU RI SQ FD SO LT 90 
MAKE ”Х 31 MAKE ”Y 0 
LOOPTURTLE 

END 
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ТО LOOPTURTLE 

IF Gak rm sbar НАКЕ ЛЖ ALI 

ІР y eo "50 CSESSP O DIOUF] 

WHEN 0 CRT С RANDOM 30 2 + 1501 

UNEN 7 СБЕТС ;:X MIRE TA CR "I TPKE "Y CH. REI 
SE LSF 50 

LOOPTURTLE 

END 


In de procedure ALCATRAZ wordt een vierkant getekend waaruit 
de Turtle niet kan ontsnappen. Tevens wordt hier aan de variabele 
:X (de kleur van de Turtle) de waarde 31 en aan de variabele :Y 
(de teller) de waarde 0 toegekend. Dan wordt de recursieve proce- 
dure aangeroepen. 

LOOPTURTLE controleert eerst de waarde van beide variabelen. 
Is de waarde van :X al 24? Zet dan de waarde weer op 31! 
Is de waarde van :Y al 50? Zet dan de procedure maar stop! 

Daarna worden er twee When-Demons geactiveerd: | 
nr.0 draait de Turtle tussen de 150 еп 180 graden rechtsom wanneer 
de Turtle in aanraking komt met de lijnen van het vierkant. 
nr.7 - verlaagt iedere seconde de waarde van :X met 1. Het gevolg 

hiervan is, dat de Turtle, van boosheid, steeds roder wordt. 
- verhoogt iedere seconde de waarde van :Y met 1. Het gevolg 
hiervan is, dat de ontsnappingspogingen van de Turtle 
plaatsvinden binnen de vastgestelde tijdsduur (in dit geval 
50 seconden). 
Tenslotte wordt de Turtle in beweging gezet door SETSP 50. 


Ziet u welke aardige dingen mogelijk zijn met de When-Demons? 
Natuurlijk is het onmogelijk op alle facetten in te gaan. U zult zelf 
moeten experimenteren. 

Nog een voorbeeld? 


EDIT "VELD 

РО FD: SO RT. 90 PD 

FD ЗО RT 90 REPEAT 3 ГЕП 180 RT 901 
FD 90 PU 

FS HOME 

TELE EO 1 @ 232 

EACH CST SEIH 80 + WHO БЕТӘР 50 PUJ 
MAKE “tijd O 

TURTLEDANS 

END 
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EDIT “TURTLEDANS 

IF :tijd = "PO CSETSP O STOP HOME] 
WHEN O CASK О RT 1801 

WHEN Ч CASK 1 RT 1801 

WHEN В CASK 2 RT 1803 


WHEN 12 CASK 3 ЕТ 1801 

WHEN 16 CASK 3 RT RANDOM 1801 
WHEN 17 CASK 1 RT RANDOM 1801 
WHEN 18 CASK 2 RT RANDOM 1803 
WHEN 19 CASK О RT RANDOM 1801 
WHEN 20 CASK 2 RT RANDOM 1803 
WHEN 21 CASK 1 RT RANDOM 1801 


WHEN 7 [MAKE 
TURTLEDANS 
END 


EI tija + 13 


Tot zover de voorbeelden van de When-Demons. Zoals we еегаег 
zagen kunt u met deze technieken uw eigen spelen maken. We zien 
dit in: Super Shuttle. 


6.6 Een voorbeeldspel: Super Shuttle 


Dit spel, dat uit één hoofd- en elf subprocedures bestaat, is een 
voorbeeld van wat er zoal met sproken en When-Demons gedaan kan 
worden. Het is een basisspel; iedereen kan er naar eigen idee ver- 
anderingen in aanbrengen. Het spel kan ook op eenvoudige wijze 
gemakkelijker of moeilijker worden gemaakt. Bij de bespreking van 
de procedures wordt dit wel aangegeven. 

Het idee achter het spel is: 
— Als piloot van een geavanceerd ruimteveer, de Super Shuttle, 
-- vliegt u door het oneindige heelal. Het is uw taak om tijdens de 
-- vlucht met de lasers van uw schip de rondvliegende meteorieten 
-- te vernietigen, anders zouden deze meteorieten grote schade aan 
-- het vliegverkeer en de ruimtestations kunnen toebrengen. 


Als u het spel start (met SPEL) wordt eerst het beeldscherm opge- 
bouwd. Er ontstaat een heldere sterrenhemel tegen een zwarte ach- 
tergrond. Dan verschijnt de maan, en even later de Shuttle en de 
meteorieten. Al deze figuren zijn sproken. 

Met de joystick beweegt u uw schip door de ruimte. Indien er 
zich voor u een meteoriet bevindt, schakelt u de laser is met een 
druk op de vuurknop.Op dat moment wordt razendsnel uw Y- 
positie en die van de meteoriet bepaald. Is deze, met een marge van 
10, gelijk, dan zal de meteoriet exploderen. 

Door de marges van de Y-posities nu kleiner/groter te maken, 
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maakt u het spel moeilijker/ gemakkelijker. 

Ook de explosies (twee verschillende) worden voorgesteld door 
sproken. Door de twee verschillende explosies ieder hun eigen kleur 
te geven vormen ze, achter elkaar geprojecteerd, een prachtige 
tweekleurige sprook. 

Als uw vliegtijd (die u zelf kunt instellen) voorbij is, kunt u 
lezen hoe vaak u een meteoriet heeft vernietigd. 


Let op. Voor andere dan Atari 8-bits Logo-versies zullen enkele 

dingen moeten worden aangepast: 

- „DEPOSIT 53275 1 om Turtle 1 groter te maken. Voor een andere 
Logo zal nu een andere waarde op een andere geheugenplaats 
moeten worden gezet. Deze opdracht kan echter ook weggelaten 
worden! 

- De kleuropdrachten SETC еп SETBG zullen andere waarden moe- 
ten hebben. 

- Ook de specifieke sprookopdrachten zullen moeten worden aange- 
past. 

Kijk hier goed naar voordat u het spel start. 


Super Shuttle 


Gebruikte variabelen: 


:BOTS = het aantal keren dat u een meteoriet hebt vernietigd. 
: TIJD = de speeltijd / ingesteld op 200 (x 1/60 seconde). 

:P1 = de (INT) Y-coördinaat van Turtle 1. 

:P2 = de (INT) Y-coördinaat van Turtle 2. 

:P3 = de (INT) Ү-собгаіпааї van Turtle 3. 

:ANTWOORD = het teken voor wel/niet (J/N) nog eens spelen van 


het spel. 


Gebruikte sproken: 


Hier ziet u de afbeeldingen van de gebruikte sproken. Achtereen- 
volgens: maan, steen, shuttle, ехріовіе.1 en explosie. 2. 


153 


Toets dus naast de procedures tevens in: 


MAKE "’explosie.e LISS 154 108 108 81 91 
ЖЗӘС 75 75 188 МВ J0 ЗО 185 1851] 
MAKE:  OKPIOSIO:T E101 TOI 190. 195 154 1Б 
Чэ TA 100 160 107 192: 35%: 25% 90 3032 
НАКЕ TONU ILE БЕ 3 у 19 PE C9-17 195 12 


AEN COL 7 


а 0:03 


аке SIREN ГО -0 зе 126 254 295 259 127 
165 ENE BSD 22E ЧӨ 00701 
ORNE APAN C3 15 CI S7 112 COG EIB eSP 2 
Si КІ TO ТЕО BE 31 14 %3 


Gebruikte kleuren: 


- achtergrond : zwart 


- shuttle : oranje/geel 
- maan : goudkleur 
= steen : lichtblauw 
- explosie 1 : wit 

- explosie 2 : rood/oranje 


Gebruikte procedures: 


1. SPEL 


2. HEMEL 


3. STERREN 


4/5. DOT1 en DOT: 
6. METEORIETEN 


7. SPACE.SHUTTLE 


8. VLIEGEN 


: de hoofdprocedure; met het aanroepen van deze 


procedure begint het spel. In SPEL worden 
enkele variabelen op 0 gezet en worden de sub- 
procedures HEMEL, METEORIETEN en SPACE. 
SHUTTLE aangeroepen. 


: In deze procedure wordt met behulp van 


STERREN een sterrenhemel getekend. Ook ver- 
andert Turtle 0 hier in een maan en deze wordt 
in positie gebracht. 


: tekent met behulp van de procedures DOT 1 en 


DOT een sterrenhemel met 100 sterren. 
plaatsen op willekeurige coördinaten een stip. 


: een belangrijke procedure die achtereenvolgens 


de Turtles 2 + 3 tot een STEEN maakt, ze een 
kleur, een willekeurige positie, richting en 
snelheid geeft. 


: Hier krijgt Turtle 1 de vorm van een shuttle. 


De shuttle krijgt kleur, richting en snelheid. 
Tenslotte wordt de recursieve procedure 
VLIEGEN aangeroepen. 


: Dit is de recursieve procedure die de shuttle 


met de joystick bestuurbaar maakt. Door deze 
besturing aan te passen kunnen we het spel 
moeilijker maken. Ook wordt hier When-Demon 
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10/11. B2/B3 


12. SLOT 


nr.3 geactiveerd. When-Demon 3 let erop of de 
vuurknop van de joystick wellicht wordt inge- 
drukt. Als dit gebeurt treedt de procedure MM 
in werking. 


: Door deze procedure wordt razendsnel de posi- 


tie van de shuttle (Turtle 1) en van de meteo- 
rieten (Turtles 2 + 3) uitgerekend. Als op het 
moment dat de vuurknop wordt ingedrukt de 
Y-positie van de shuttle niet groter dan de 
Y-positie + 10 of kleiner dan de Y-positie - 10 
van een van beide meteorieten is, treedt B2 of 
B3 in werking. 

Maak om het spel moeilijker te maken de marges 
kleiner (bijvoorbeeld van 10 naar 5). 


: de 'explosie'-procedures. De Turtles 2 en/of 3 


veranderen hier van een meteoriet in een ex- 
plosie. Ook wordt hier de waarde van :BOTS 
met 1 opgehoogd. Na dit alles verandert de 
Turtle van explosie gewoon terug in een meteo- 
riet. 


: Het einde van het spel. Hier wordt vermeld 


hoeveel meteorieten geraakt zijn, en krijgt de 
speler de kans het spel nogmaals te spelen. 


Dat waren ze, alle twaalf de procedures van Super Shuttle. Zoals 
gezegd is het spel betrekkelijk eenvoudig. U kunt, met wat fanta- 
sie, echter dit spel gebruiken als uitgangspunt voor uw eigen ver- 
sie van Super Shuttle. U kunt het spel ook zien als een introductie 
in het zelf-spelen-maken met de mogelijkheden die Logo u biedt. 
Wat u er ook mee doet, hier komt de listing van de twaalf proce- 


dures. 


SUPER SHUTTLE 


ТО SPEL 
CS FS 


IELL LO еги. РЫ 
MAKE “BOTS О 
MAKE “TIJD Q 


HEMEL 


METEORIETEN 
SPACE , SHUTTLE 


END 


ТО HEHEL 


TELL О:РПУВЕТВЕВ A 
STERREN 100 


PUISH 1 


: MAAN 


TELL O SEISH 3 9i DEIO 19 
РО БЕТРӘБ Ze EI 7987 


END 


TO STERREN : TELLER 

ІР eTELEER т" "D CSTOPJ 

DOT LIST RANDOM 300 RANDOM 200 
OIERREN :TELLER - 1 

END 


TO DOT1 :OLDPOS :POS PEN :SHOUNP 
НЕ РЫ 

SEIFUS (POR PETPC O 15 

PD FD D PU SEYPOS LO 03 

RUN ЕРОТ PEN LJ 

IF :SHOWNP LST) 

END 


TO DOT : POS 


ASK FIRST WHO CDOT1 POS :РО5 PEN SHOWNPJ 


END 


TO METEORIETEN 

PUISK 3 STEEN 

TELL KE SARAH 3 SEIC 78 PU 
SEIA С RANDOM 200 > =: 100 

БЕТҮ С RANDOM 200 > — 100 

EACH ГБЕТН С RANDOM 180 2 + 903 
EACH CSETSP С RANDOM 50 ) + 253 


ТО SPACE, SHUTTLE 

PUISH ë + SRUTILE 

REPIS KEE 1 

TELL 1 DEION B SEIL 125 BI 
SEIH Е70 БЕТЕР 199 

МІ.ТЕСЕМ О 

END 
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TO VLIEGEN :TIJD 

ІБІТІЛІ > РОО CBEOT STO J 

Е L Komt PEZO 

РОТӘН Ч :explosie.l 

PUTSH 5 :explosie.e 

MAKE “RICHTING JOY О 

IF ARIENTING we D CRT 90 PD: 83 LT 3012 
IF :RICHTING = ӨК SQ FU DS EK 
IF + REGMEENG = D LCTO S03 

IF Ss RICHTING = "E CDER 907 

WHEN 3 CMMJ 

ERN “RICHTING 

VLIEGEN «ТЫП Ж 1 

END 


TO MM 

TELL В. MAKE PPP: INT: TUUR 

TELL 3 MAKE "F3 [NI TOOK 

TELL 1 MAKE "РІ INI YGOR 

IF- AND IPT < :PE *- 109 Pr > rE m 10 TBI 
IF AND Pi < AT TOR TRS => 1p LR 
END 


TU Be | 

TELL ©- БЕТӘР. GQ БЕЛЕҢ, Ч Ei 7 
WAIT 50 НТ 

MAKE- "DOIS БОЗ Жа 
METEORIETEN 

END 


ТО ВЗ 

TELL 232 SEISP О БЕЗИ WARIL ES 
WAIT 50 HT 

MAKE “BOIS : ROIS 7 
METEORIETEN 

END 
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TU SLOT 

TLR KO 1e 32 SEI BEEN O ROME HI 
ге СТ 

PR Ebefeliciteerd ттт: J 

PE LJ 

PRL 

PR [In deze vliegreis met] 

PR Cde Super Shuttle ,1 

PR (С SE Ebene іп Eoteek elo nz 
PR Ckeer een meteoriet vernietigd |J 
PR [Nog eens proberen 73 

PRE 

PR (Toets maar J / NJ 

MAKE "ANTWOORD RC 

IF :ANTWOORD = 7J ССІ SPELJ CCTJ 

END x 


6.7 Sproken voor gevorderden 


Ñ EEND 
т X pavat 


Zoals u reeds hebt gezien worden de sproken ontworpen in de Shape 
Editor. Wanneer u de Shape Editor aanroept krijgt u het raster te 
zien zoals dat op de volgende bladzijde is afgebeeld. Er zijn zestien 
horizontale rijen; iedere rij is één byte informatie. Zoals u weet 
bestaat een byte uit acht bits en kijk: op iedere rij staan acht hok- 
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jes (nr.0-7) te wachten om te worden ingevuld. 


Vult u bij het maken van een sprook zo'n hokje in, dan krijgt 
dit bit de waarde 1. Blijft een hokje open, dan krijgt het desbe- 
treffende bit de waarde 0. 

Laten we maar eens gaan kijken naar een voorbeeld. Het eerste 
plaatje is een vorm die als voorbeeld dient. Het tweede plaatje is 
het bit-patroon van de vorm. Bij de ingekleurde hokjes heeft een 
bit de waarde 1, bij de lege/open hokjes de waarde 0. 


ШЫ gz rer ез ОШ Se WO ша ип иш ый 
Жы vr же жə E ОТЕ 1 ШЕ 
шш кн es шш 111110 8% 
Ka L. ш КЕ ШЕШЕ ШЕ ИП ка 
ки: пөн Mk т EN ИП БЕ ИЛ GD 
me юк ы р 14141110 нж 
mes кш ше ко ШИП ИЛЕШ ИП ЕШ 
me е б ж ШЕШЕ БЕИ mn 
к OS те эш ИП ЖЕ EW ИЛ ЕД. 
nw KZ Kas: KN DS DE A. Kn 
Ka к. RI “4114140 Kn 
Ka Ke 21111141 ER 
Же жай «1111141 mn 
Be gx ау М 21041141 CO 
ШЫТ аж o D "ep D 2101011 ки 


Bekijken wij het bitpatroon уап de vorm zorgvuldig, dan zien we 
op iedere horizontale rij een binair getal staan. In het voorbeeld 
zijn dat de volgende getallen: 


Rij 0 : 00011000 Rij 8 : 01100110 
Rij 1 : 00111100 Rij 9 : 01100110 
Rij 2 : 01100110 Rij 10 : 01100110 
Rij 3 : 01100110 Rij 11 : 01100110 
Rij 4 : 01100110 Rij 12 : 01111110 
Rij 5 : 01100110 Rij 13 : 00111100 
Rij 6 : 01100110 Rij 14 : 00111100 
Rij 7 : 01100110 Rij 15 : 00011000 
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Als u hoofdstuk 4: Logo cijfers en getallen heeft doorgelezen, zal 
het u geen moeite kosten deze binaire getallen om te zetten in deci- 
male. Als u dat doet krijgt u de volgende decimale getallen: 


24 60 102 102 102 102 102 102 102 102 102 126 60 24 


En dit zijn de gegevens voor de vorm van de vorige bladzijde. Wan- 
neer u deze vorm met EDSH 1 zou maken en u typt PR GETSH 1, 
dan krijgt u de zojuist genoemde getallen. 

Overigens hoeft u de binaire waarden niet om te rekenen om 
de decimale waarden te weten. Als we boven het raster uit de 
Shape Editor de binaire machten schrijven, kunt u gewoon optellen. 
Kijk maar: 
Rij 0 = 1 x 16 + 1 x 8 = decimale waarde: 24 
Rij 1 =1 x32+1x16 +1 x 8 + 1 x 4 = decimale waarde: 60 
Op deze manier kunt и, zonder binair/decimaal omrekenen, zelf de 
decimale waarden van de vorm uitrekenen. 


128 64 32 16 8 4 2 1 = waarde 
PMA. vk WE, = bitnummer 
rij CE БЕ БЕ БЕ БЕ БЕ БЕН БЕ ШЕ 
Шығ о лы бә Же СИН гі Өш 
CR SS "ez ба ыз e Së oe ӨШ 
КЫ БЕ БЕ БЕ БЕ БЕ БЕ БЕ БЕ 
4,1 a 
E БЕ БЕ БЕ БЕ БЕ БЕ БЕ ШЕ 
ER БЕ БЕ БЕ БЕ БЕ БЕ БЕ ШЕ 
TEL NU Ұз іс Яс жо ғы БЫ: 
86 111 
92 БЕ БЕ БЕ БЕ БЕ БЕ БЕ ШЕ 
UE е Ж ғысы ИШЕ ғы ғтк 
(E өс нк ди ге Es па Ga шы 
2 БЕ БЕ БЕ БЕ БЕ БЕ БЕН ШЕ 
13 е сұл ық Қо шо қу ги J 
(GË e "ep re es же мә ми ив 
кк жы vn АЗЕ ep ыс ge мә 


Op dezelfde manier als wij in de Logo-sprokenwereld vormen en 
figuren maken, is ook de tekenverzameling van uw computer ontwik- 
keld. Ergens in het geheugen van uw computer liggen de binaire 
gegevens opgeslagen van alle tekens waarover uw computer beschikt. 
De letters, de cijfers, maar ook : ! "#$ $& ! @ ( ) < > [ ] ? enzo- 
voort. 

Het zou plezierig zijn als we deze gegevens konden gebruiken 
om sproken mee te maken. Sproken in de vorm van letters, sproken 
in de vorm van cijfers. Daar zijn veel aardige sprokenprocedures 
mee te schrijven. Wat denkt u bijvoorbeeld van vier sproken die 
samen woorden maken? Of van vier sproken die samen de digitale 
tijd aangeven? 

Laten we eens kijken of we dat voor elkaar kunnen krijgen. Op 
de Atari 8-bits computers staat de tekenverzameling in de lokaties 
57344 - 58367. Werkt u met een andere computer dan moet het niet 
al te moeilijk zijn om de desbetreffende geheugenplaatsen in uw 
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machine te vinden. Kijk daarvoor in uw handboek. 

Nu is de tekenverzameling van de Atari niet opgebouwd uit zes- 
tien bytes (zoals de sproken bij Logo), maar uit acht bytes. Wan: 
neer we dus achter de gegevens van een teken willen komen, zullen 
we acht bytes, ofwel acht geheugenplaatsen, moeten bekijken. Maar 
waar vinden we nu de gegevens van bijvoorbeeld het teken A? 

Om de juiste geheugenplaats te vinden is nogal wat rekenwerk 
nodig. De eerste informatie die we nodig hebben is de ASCII-code 
van het gewenste teken. 


Opmerking. De ASCII-code is de American Standard Code for 
Information Interchange. Ieder teken op het toetsenbord van uw 
computer heeft een code, die voor (bijna) alle computers gelijk is. 


De decimale ASCII-code van A is 65. En dan de berekening. Kijkt 
u naar het volgende rijtje: 


ASCII-code Berekening 
0 t/m 31 (ASCII-code + 64) х 8 
32 t/m 95 (ASCII-code - 32) x 8 
95 t/m 127 ASCII-code x 8 

Voor het teken A wordt de berekening dan: 
65 - 32 = 33 
33 x 8 = 264 


Het aldus verkregen getal is erg belangrijk. 

Tellen we dit getal op bij 57344 (dit is de geheugenlokatie waar 
de tekenverzameling begint), dan krijgen we 57608. En dit is het 
adres waar de informatie over de A begint. 

Om alle informatie over de A te weten te komen zullen we echter 
niet één, maar acht adressen moeten bekijken. Immers de informatie 
van ieder teken ligt opgeslagen in acht bytes. Zo zijn dus op de 
geheugenadressen 57608 t/m 57615 de gegevens te vinden van de A. 

Op deze manier kunt u nu zelf de gegevens van ieder teken 
vinden. Kijk daarvoor steeds eerst naar de ASCII-code van het 
teken en pas dan de juiste berekening toe. 

Nogmaals: de genoemde geheugenadressen zijn die van de Atari 
8-bits computers. Indien u met een andere computer werkt, zult u 
eerst de juiste geheugenlokaties moeten opzoeken! 
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От nu met de gegevens van een teken een sprook te maken moeten 
we het volgende doen: 


1; 
2. 
3 


ZS 
8. 


Het ASCII-codenummer van het teken bepalen. 

Met behulp van dit codenummer de berekening uitvoeren. 

Het aldus verkregen getal optellen bij 57344 (voor Atari 8-bits 
computers). 

Uit de aldus verkregen geheugenplaats met .EXAMINE de waarde 
lezen. 

Ook de waarde lezen van de zeven geheugenplaatsen daarna. 
Deze waarden steeds tweemaal (een sprook heeft geen acht maar 
zestien bytes informatie nodig) in een lijst plaatsen. 

Alle gegevens (in een lijst) toekennen aan een variabele. 

De gegevens gebruiken om van een sprook een teken te maken. 


Een en ander hoeft u niet zelf te doen. De volgende procedures 
nemen u alle rekenwerk uit handen en laten u in een fractie van een 
seconde de Turtle zien als door u gekozen teken. Als u bijvoorbeeld 
typt: MAKESH "В ziet u razendsnel Turtle 0 in een B veranderen. 


Met behulp van deze procedures kunt u naar hartelust ехрегі- 


menteren. 


ТО MAKESH :М 

Ri 0 TELL Q ST 

ERN "VORM 

MAKE ға ASCII :N 

IF OR :A < O :A > 127 CERN "e MAKESH :S 
: NJ 

ТЕ : < Зе CHAKE "P C :A-+- БЧ.) "81 

IF AND :A > 31 :A < 95 CHAKE "P С :A - 3 
е = 87 

LE В > 95 CHAKE ZER Go * B 22 

МАКЕ "PP +P + 573ЧЧ 

MAKE ”BYTE О 

MAKE “VORM [J 


GET :PP 
PUT 

END 

ТО GET РЁ 


MAKE ”GEGEVENS1 .EXAMINE :РР 
MAKE ”БЕБЕЧЕМ52 .ЕХАМІМЕ :РР 
MAKE “VORM LPUT :GEGEUENS1 : ЧОВМ 


МАКЕ "VORM LPUT :GEGEVENS2 : VORM 


GEREEST? 
MARD DYTE :BYTE + 1 
КУ QPP +1 

END 


15 PUT 

PUISH 1 :VORM 
ыы О SI SETSH- 1 
END 
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6.8 Het maken van meerkleurige sproken 


Zoals we reeds eerder zagen kunnen we een sprook een kleur geven 
met SETC gevolgd door een kleurnummer. Wellicht heeft u zich, ter- 
wijl u dit hoofdstuk las, ook afgevraagd of het mogelijk is sproken 
in meerdere kleuren te maken. Het zal u teleurstellen, maar zowel 
in Atari LCSI Logo als in de meeste andere Logo-versies is het niet 
mogelijk om één sprook in meerdere kleuren af te beelden. 

Het is evenmin mogelijk animatie te doen met één sprook. Om 
beweging te simuleren hebben we meerdere sproken nodig, еп, u 
raadt het al, ook om meerkleurige sproken te maken kunnen we een 
soortgelijke techniek gebruiken. Bij animatie worden verschillende 
sproken na elkaar op het beeldscherm gebracht, en om meerkleurige 
sproken te maken worden ze tegelijkertijd (en achter elkaar) afge- 
beeld. 

Wanneer we meerdere (in Atari LCSI Logo maximaal vier) spro- 
ken achter elkaar afbeelden en we geven iedere sprook een andere 
kleur, dan zien we een sprook met meerdere kleuren. Een mooi voor- 
beeld is de explosie die gebruikt wordt in het spel Super Shuttle. 
Door nu twee verschillende sproken te ontwerpen, ze ieder een 
andere, contrasterende kleur te geven en ze achter elkaar af te 
beelden, krijgen we een tweekleurige explosie. 

Hier zijn de twee sproken die gebruikt zijn voor de explosie. 
Ziet u dat ze '‘eomplementair! zijn, dat wil zeggen dat ze elkaar aan- 
vullen? Het heeft geen zin ze elkaar te laten overlappen. 


Ook bijvoorbeeld een gezicht is op deze wijze vrij nauwkeurig te 
maken. Natuurlijk kunnen we ook bij meerkleurige sproken met ani- 
matie werken. Dit gezicht is er een voorbeeld van. Er worden meer- 
dere sproken in gebruikt: 1. het gezicht; 2. het haar en de snor; 
3. de ogen open; 4. één oog dicht; 5. de mond open; 6. de mond 
dicht. Door nu achter elkaar (tegelijkertijd) sprook 1, 2, 3 en 5 af 
te beelden ontstaat een gezicht in vier kleuren. 

Dit gezicht biedt ook animatiemogelijkheden: 
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- Laat om een knipoog te simuleren sprook 3 en 4 elkaar afwisselen. 
- Laat om praten te simuleren sprook 5 en 6 elkaar afwisselen. 


Hier zijn de zes benodigde sproken: 


6.9 Nuttige hulpprogramma’s 


Zoals u in dit hoofdstuk heeft kunnen lezen heeft LCSI Logo van 
Atari vier opdrachten die specifiek gericht zijn op het werken met 
sproken. Het zijn: 


1. EDSH : roept de Shape Editor aan. Deze opdracht wordt 
gebruikt bij het ontwerpen van sproken. 

2. SETSH : geeft de laatst aangeroepen Turtle(s) de genoemde 
vorm. 

3. GETSH : geeft als uitvoer een lijst met 16 getallen, zijnde de 
gegevens van de genoemde vorm. 

4. PUTSH : geeft aan de genoemde vorm de, in een variabele vast- 
gelegde gegevens. 


De opdrachten worden in de volgende volgorde gebruikt: met 
EDSH 1 ontwerpt u de eerste vorm, met MAKE "у GETSH 1 geeft u 
aan de variabele "v (of een andere naam) de gegevens van de 
zojuist ontworpen vorm 1. In een procedure of in de ‘Direct Mode. 
toetst u PUTSH 1 :v in; daarmee geeft u de gegevens uit de varia- 
bele :v aan vorm 1. De vorm 1 kan nu worden gebruikt: met 
SETSH 1 geeft u de laatst aangeroepen Turtle(s) deze gedaante. 

Soms is het echter plezierig om een paar opdrachten meer ter 
beschikking te hebben wanneer u met sproken werkt; opdrachten 
om gemaakte sproken te kopiëren en te veranderen; opdrachten om 
gemaakte sproken te wissen of in een animatie te gebruiken. Over 
zulke opdrachten beschikken de meeste Logo's echter niet. Dat is 
geen probleem, we schrijven de opdrachten zelf! 

Als voorbeeld vindt u elf voorbeeldprocedures die zich in Logo 
gedragen als opdrachten. Omdat de procedures als (zelfgedefinieer- 
de) opdrachten zullen worden gebruikt, zijn voor de procedurena- 
men Engelse woorden gekozen. Werkt u echter met een Nederlandse 
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Logo dan is het handiger om ook Nederlandse procedurenamen te 
kiezen. 


Opmerking. Denkt u erom, dat de procedures geschreven zijn voor 
de Atari LCSI Logo-versie? Dit is vooral belangrijk voor de proce- 
dures SYSRESET, ERSH, ALL en ALLSH. Iedere procedure is ech- 
ter aan te passen aan elke Logo-versie. 


Hier volgen eerst de procedures, later zullen we een en ander toe- 
lichten. 


TO ЗҮЗКЕЗЕТ 

ЗЕТОВ. УЧ SEIFU BEER 

SEFC 1 ЧУ SEITE Е ЛЕЯ 

TELL O SETC 7. FELE Е БЕЛЕ CU 

TELL е SEIC YH- TELL 2 SCIE ON 
«БВЕҒОБІТ 532565: 0 эПЕРОБІН: 9382937- 0 
.DEPUSIT 53298; Me ЖЕРБЕТІ 92899 0 
TELL ALL БЕТӘН Q DEIO O LS PU NL 
ТЕ O SI- CI 

END 


ІЗ ERSH n 

[MAKE "ЗЕЗБЕУЕМЕКНІО O OQ D O 00 B 00-070 
о 06-01] 

IF ЕПРТҮР :n CERN: 7DEGRUENS ТОРО 
ЕТЕР ett LPUYTSHW EINE NSD GEGEVENS ER 
SH BF in LPDISH +i ¿+ GESEVENDS ЕКА "БЕБЕУ 
ЕМ5Ј 

END 


TO ALLSH 


ОРАЛ аны e Ken e ШУМ 13 Vi 1683 
END 


TO REM :opmerking 
END 


ТО DOWNSH :п 
РОЛЕН чт С SE O BS DEISH гп 
END 


ID.UPSH :p 


PUTSH. np LC SE BF БЕТБН: :п 0 
END 
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ТО PRSH :п 
РК БЕТӘН п 
END 


EO COPYSH eni. ene 
PUITSH :пе GETSH :n1 
END 


TO MOVESH :snelheid np 
ТРУС kk wen STOP 
SELISH -F IRSI n 

WAIT :snelheid 

PU FD: 1 

MOVESH :snelheid BF :n 
END 


TO ALL 


з 6:37 
END 


Uitleg van de hulpprogramma's 


Om de uitleg van de hulpprogramma's te illustreren maken we 
gebruik van de volgende sprook: 


Als we nu PR GETSH 1 toetsen krijgen we de gegevens van dit 
ѕргоок. 


PR:GEISH. 1 


55 ea Ae ies 195 103 ТЕЗ 128 129 129 1р8 189 189 
PS 169 кзэ 


Met TELL 0 SETSH 1 laten we Turtle 0 deze vorm aannemen. 
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Dan kijken we nu naar de hulpprogramma's. 


SYSRESET 


: is een opdracht die u gebruikt om alles weer te laten 


zijn zoals het was toen u Logo startte. Alle Turtles 
krijgen weer hun eigen vorm, kleur en formaat, alleen 
Turtle 0 is zichtbaar, het beeldscherm en de tekenpen- 
nen hebben weer hun oorspronkelijke kleur. 


ө Met TELL 0 SETSH 1 SETC 120 SETSP 40 geven we Turtle 0 een 
vorm, een kleur en een snelheid. Om nu terug te gaan naar de 
‘oorspronkelijke! toestand toetsen we SYSRESET. Met SYSRESET 
hoeven we de vorm, de kleur en de snelheid niet apart te 'herstel- 
len’ maar gebeurt dit tegelijk. 


ERSH 


: met deze opdracht wiet! u alle gegevens van де 


genoemde vormen zonder de overige gebruikte variabe- 
len te wissen. 


e Toetsen we ERSH 1 (en RETURN) dan wissen we alle gegevens 
van sprook 1. Kijk maar: 


ER BET 1 


e55 129 129 129 129 129 129 129 129 129 199 129 129 
129. 189 855 


ERSH 1 


PR ЗЕТӘН 1 
осбооооос ОЖ ООО 


ALLSH 


: is geen opdracht, maar geeft als resultaat: alle vormen. 


eToetsen we ERSH ALLSH, dan wissen we de gegevens van alle 


sproken. 


REM 


: soms is het, en dat geldt niet alleen bij procedures 


met sproken, handig om commentaar, opmerkingen 
enzovoort in een procedure te zetten. BASIC kent een 
REM-opdracht, dus waarom zou Logo daar niet over 
kunnen beschikken? Zoals u ziet is REM een lege pro- 
cedure. 


e Als voorbeeld de procedure die op de volgende bladzijde is afge- 


drukt. 
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EDIT “VOORBEELDJE 

FELL KO. 3291 5ETSH 1 

REM [Turtle O en 1 nemen hier de 
vorm уап sprook 1 аап] 

NL SO: SEISP -100 

REM [Beide Turtles worden hier 90 
graden naar rechts gedraaid) 

REM Геп krijgen een snelheid van 
100 eenheden) 

REM LJ 

REM [Zo zijn er nog veel meer) 
REM [regels te maken, ] 

REM [Het zijn regels die door Logo) 
REM [worden genegeerd. 


DOWNSH : is een opdracht die u kunt gebruiken als bijvoorbeeld 
blijkt dat een door u ontworpen vorm te groot is, of 
wanneer u iets bovenop de vorm wilt plaatsen. Met 
DOWNSH namelijk gaat genoemde vorm een rij (zie 
Shape Editor) naar beneden. De bovenste rij wordt 
dus een lege rij. 


e Toetsen we EDSH 1 dan zien we: 


Met DOWNSH 1 en EDSH 1 krijgen we het volgende resultaat: 


UPSH : is het tegenovergesteide van DOWNSH. Bij UPSH wordt 
de onderste rij van genoemde vorm een lege rij, en 
‘schuiven! alle rijen omhoog. 
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ө We maken weer gebruik van sprook 1, zoals we dit aan het begin 
maakten. EDSH 1 geeft dan: 


PRSH : laat u alle gegevens zien van de genoemde vorm. 
ө Uitgaande van de met UPSH 1 gemaakte sprook krijgen we het vol- 
gende: 
PRON- 1 
129 1РЗ 188-108 Les 238-1638 ЗЕР EE EL 129 129 
les 095 Q 
COPYSH : is een handige opdracht. Met deze instructie "Коріеегі! 


u een vorm. Dit is bijzonder handig als u bijvoorbeeld 
met animatie bezig bent. Zoals u gelezen hebt, zullen 
bij een animatie de gebruikte sproken slechts weinig 
van elkaar verschillen. Als u nu eerst, laten we zeg- 
gen, drie gelijke vormen maakt, kunt u daarna de voor 
animatie noodzakelijke kleine verschillen aanbrengen. 
U zult merken dat COPYSH u veel werk scheelt. 


ө Met COPYSH 1 2 maakt u sprook 2 gelijk aan sprook 1. 


MOVESH 


: geen volledige animatie-opdracht, maar net genoeg om 


u tijdens de ontwerpfase te laten zien wat het gevolg 

is van animatie van de genoemde vormen. 

MOVESH vraagt twee invoergegevens: 

— de tijd tussen het afbeelden van de verschillende 
vormen; 
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- de vormen (geplaatst in een lijst!) die moeten worden 
afgebeeld. 


Opmerking. De procedure is niet recursief! 


e Indien u de sproken 7, 8 en 9 ontworpen hebt en deze in een 
snelle animatie wilt zien, dan toetst u bijvoorbeeld: 


REPEAT 50 CTOVESH е [7 BIJ 


ALL : is geen opdracht, maar geeft als resultaat alle vier de 
Turtles. Eenvoudig aan te passen als u met een Logo 
werkt waarbij meer dan vier Turtles tegelijk 'actief' 
kunnen zijn. 


e Met TELL ALL SETSP 0 zetten we bijvoorbeeld alle Turtles stil. 
Met TELL ALL REPEAT 3 [FD 100 RT 120] laten we alle Turtles 


een driehoek tekenen. 


Dat waren de hulpprocedures. Als u enige tijd met sproken hebt 
gewerkt, zult u snel in staat zijn uw eigen opdrachten te maken. 
Dat is een van de zeer aantrekkelijke kanten van Logo. 


170 


SPROKEN ONTWERP BLAD 


LOGO MET KINDEREN 


Hoofdstuk 7 


4 ; 
es: ener ° 
WH ТАШ 


" be eend 
. 2 e We “í 
d DEL E Т 


d 


Gi 


1% ke 
Te Т ТЕ i 
2 , 


l 


4! 
47 


7А 


ff 
d 


(IER A 


172 


7.1 Inleiding 


Hoewel de programmeertaal Logo aanvankelijk ontwikkeld is ten 
behoeve van kinderen, is het beslist geen kindertaaltje. Dat heeft 

u hopelijk in de voorgaande hoofdstukken reeds kunnen constate- 
ren. Dit neemt echter niet weg dat Logo uitermate geschikt is voor 
kinderen. Natuurlijk thuis, maar ook op de scholen voor basisonder- 
wijs en speciaal onderwijs. We kunnen Logo beschouwen als alterna- 
tief voor het, nu reeds, ‘traditionele onderwijs met de computer’. 

Er is namelijk een vrij grote kans dat het traditionele gebruik 
van computers in scholen - het Computer Ondersteund Onderwijs 
(C.O.O.) - niet meer zal blijken te zijn dan ‘oude wijn in nieuwe 
zakken'. Zorgverbreding еп kindgericht onderwijs zijn de magische 
woorden. In de meeste gevallen echter blijkt de huidige generatie 
computers niet eens zo veel meer te bieden dan de traditionele leer- 
middelen. Wellieht maakt het schoolbord plaats voor een beeldscherm 
еп een leerboek voor een 'leerprogramma', maar in wezen verandert 
er niets. 

O, zeker ... een computer boeit kinderen meer dan een leer- 
boek, maar daardoor verandert het leerproces niet of nauwelijks. 

Al dan niet elektronisch zal het kind zich kennis eigen moeten 
maken. Kennis door anderen uitgezocht. We spreken hierbij van een 
'produktiviteitsprincipe'. 

Seymour Papert, geestelijk vader van Logo en leerling van Jean 
Piaget, bedoelde Logo als een alternatief voor bovengenoemde elek- 
tronische les- en overhoormachine. Logo is een alternatief voor de 
computer die "bet kind programmeert’. Immers in bovengenoemd 
produktiviteitsprincipe wordt het kind een "уап tevoren bepaalde! 
hoeveelheid kennis ор een "уап tevoren bepaalde! manier aangebo- 
den. Dat kan nuttig zijn voor het aanleren van bepaalde schoolse 
zaken (bijvoorbeeld spellingsregels), maar in feite voegt de com- 
puter niets nieuws toe aan het onderwijs. 

Logo draait de zaken om. In een Logo-leeromgeving program- 
meert niet de computer het kind, maar het kind de computer. In 
een Logo-leeromgeving is het niet de computer die zegt wat er 
gebeuren moet, maar neemt het kind de initiatieven. Door de 
opdrachten die het kind de computer geeft kan het kind tekeningen 
maken, taalspelen maken, animaties en sproken ontwerpen, enzo- 
voort. De Logo-computer is voor het kind desgewenst een teken- 
bord, een muziekinstrument of een typemachine. 

Doordat het kind de computer leert, leert het zelf ook. Het kind 
leert, doordat het met de computer communiceert, analytisch en 
structureel te denken. Het kind leert problemen te formuleren en op 
te lossen. Het kind leert problemen te splitsen in kleinere proble- 
men - Papert noemt dit ‘denkklare brokken! - om zo tot de oplossing 
van grotere problemen te komen. 

Tevens is een kind, terwijl het programmeert, bijna ongemerkt 
bezig met vele 'schoolse vaardigheden’ zoals rekenen, wiskunde, 
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schrijven, manipuleren van informatie, ruimtelijke oriëntatie en nog 
veel meer. Ook kan ieder kind op zijn eigen niveau en in zijn eigen 
tempo met de computer aan de slag. In tegenstelling met de les-en- 
overhoor-computer blijft de Logo-computer eindeloos boeien en 
fascineren. Dat weet ik uit ervaring en daar wil ik u graag iets 
meer over vertellen. 


7.2 Een praktijkverslag 


In het najaar van 1983 zocht ik, aangestoken door de '‘computer- 
koorts! naar een manier om met de computer op school aan de slag 
te gaan. Ik was toen als leerkracht werkzaam aan een school voor 
Speciaal en Voortgezet Speciaal Onderwijs. Om de in de inleiding 

_ genoemde redenen koos ІК ervoor in mijn situatie de computer niet 
als 'les-en-overhoormachine'! te gebruiken. Via Forth en de auteurs- 
taal Pilot kwam ik toen bij Logo terecht. 

Alle begin is moeilijk, de Logo-module (voor de Atari 8-bits 
computer) was duur en informatie over Logo was haast niet te krij- 
gen. Door een artikel in een tijdschrift kwam ik echter op het spoor 
van het Logo Centrum Nederland in Nijmegen. De mensen daar maak- 
ten mij enigszins wegwijs in de wereld van Logo. Geen artikel of 
boek dat ook maar iets met Logo te maken had bleef ongelezen. 

Intussen was ik thuis reeds druk aan het experimenteren met 
mijn pas gekochte Logo-module. 

Toen ik Logo op school wilde introduceren, stuitte ik op een 
groot probleem: de Logo die ik bezat was Engelstalig. Op zich is 
dat niet zo bezwaarlijk natuurlijk, maar in mijn situatie lag dat wat 
moeilijker. Zoals zo vaak zou blijken lag de oplossing van dit pro- 
bleem in de taal zelf. Logo is namelijk een proceduretaal en is als 
zodanig in staat nieuwe woorden te leren die zich net zo gedragen 
als de oorspronkelijke Logo-opdrachten. 

Meteen ging ik aan de slag en het lukte! Om de opdracht 
FORWARD te vertalen gebruikte ik de volgende procedure: 


EDIT "U :stap 
FD :stap * 10 
END 


En dat was alles. In plaats van de Turtle met FORWARD (of FD) 
vooruit te sturen kon dat nu ook met V. De stapgrootte vermenig- 
vuldigde ik met 10 om het werken met grote getallen te voorkomen. 
FD 90 kon nu dus ook worden bereikt met V 9. Op dezelfde manier 
heb ik toen meteen BACK (BK) vertaald in A. 

Daarna waren RIGHT (RT) en LEFT (LT) aan de beurt, omdat 
dit de belangrijkste Turtle Graphies opdrachten zijn. Eigenlijk wilde 
ik hierbij het werken met graden omzeilen. Er moest een eenvoudige 
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manier zijn om weliswaar verschillende hoeken te kunnen kiezen, 
maar dan zonder het gebruik van graden. Een begrip als 180 gra- 
den rechtsom of 60 graden linksom zouden de kinderen nooit begrij- 
pen. Ik heb toen gekozen voor drie verschillende procedures voor 
RT en drie procedures voor LT. | 

De procedures voor een kleine! bocht (30°) noemde ik В en L, 
voor een iets grotere bocht (45°) RR en LL en voor een grote bocht 
(90°) RRR en LLL. Door middel van combinaties zijn vele soorten 
hoeken te maken: 
- L L voor een hoek van 60 graden naar links, 
- RR R voor een hoek van 75 graden naar rechts, 
- L RR voor een hoek van 15 graden naar rechts, enzovoort. 
Natuurlijk moest ik hier concessies doen, maar Logo werd op deze 
manier en іп deze situatie veel kindvriendelijker. 

Zo zagen bijvoorbeeld de procedures voor de rechtsom-opdrach- 
ten eruit: 


Full -R EDIT "Rb EDIT ”RRR 
КІ. 20 КІ 45 RT 90 
END END END 


Op deze manier heb ik veel LCSI Logo-primitieven vertaald. Ik 
zeg uitdrukkelijk VEEL, maar niet alle primitieven. Logo-primitieven 
die niet relevant waren voor mijn situatie heb ik buiten beschouwing 
gelaten. Onder de opdrachten die ik niet vertaalde waren functies 
zoals: POS, BG, PC, XPOS, YPOS, HEADING, WHO, NAMEP, 
EMPTYP, NUMBERP, maar ook opdrachten als: POALL, PODS, 
PONS, POPS, POTS, RECYCLE, NODES, enzovoort zijn door mij 
niet vertaald. 

Toen ik klaar was met vertalen stuitte ik op een ander probleem. 
Door alle vertaalprocedures had ik namelijk zoveel geheugenruimte 
verbruikt, dat er nauwelijks nog ruimte was om te programmeren. 
Als oplossing koos ik voor losse vertaalde Logo-werelden, dat wil 
zeggen: 

1. de Schildpadwereld (uitgebreid) vertaald; 

2. Taal, Muziėk en Sproken tezamen vertaald. 

Zo verkreeg ik twee aparte vertalingen. Een voor de uitgebreide 
Schildpadwereld en een voor de gecombineerde Taal-, Muziek- en 
Sprokenwereld. 

Ik was van mening dat de eerste Logo-wereld (Schildpadwereld) 
vrij uitgebreid moest zijn. Er moest, in het Nederlands, ook de 
mogelijkheid zijn voor eenvoudige sprookvormen, voor eenvoudige 
taalopdrachten en voor een eenvoudige geluidsopdracht. 

Een moeilijkheid was nog het kiezen van de goede Nederlandse 
woorden voor de Logo-opdrachten. Nederlandse Logo-woorden moes- 
ten duidelijk, eenvoudig, kort (voor veelgebruikte opdrachten) en 
verantwoord zijn. De eerlijkheid gebiedt mij te zeggen, dat dit niet 
in één keer slaagde. Maar al te vaak bleek in de praktijk, dat de 
Nederlandse Logo-woorden te lang, te onduidelijk of te onlogisch 
waren. Maar al te vaak heb ik de Nederlandse Logo-woorden moeten 
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aanpassen. Arme kinderen, te vaak moesten zij wennen aan een 
nieuw Logo-woord. 

Toch is de door mij gebruikte 'NederLogo' steeds duidelijker en 
gestructureerder geworden. Ik zal u de volledige lijst van Neder- 
Logo (Schildpadwereld) geven, maar natuurlijk staat het iedereen 
vrij de Nederlandse woorden naar zijn eigen smaak en behoefte aan 
te passen. Hoe dat moet zal iedereen nu wel bekend zijn. 

Zijn de voornaamste Logo-woorden vertaald, dan gaat er een 
wereld voor de kinderen open: de wereld van de Logo-schildpad. 
Dan kan er naar hartelust worden geëxperimenteerd met lijnen, 
bogen, hoeken, kleuren, vormen en figuren. Sneller dan we denken 
komen kinderen dan vaak tot de meest fantastische resultaten. 


7.3 NederlLogo 2.7 - De complete lijst 


NederLogo-opdrachten LCSI-opdracht 


Van FD np 

A :n BK :n 

R, RR еп RRR RT 30, 45 en 90 
L, LL en LLL LT 30, 45 en 90 
HH :п REPEAT mn 
LEER "п EDIT "п 
MAAK "пт MAKE "пт 
K (KOM) ST 

W (WEG) HT 

S (SCHOON) CS 

WT (WEG TEKENING) CLEAN 

WW (WEG WOORDEN) СТ 

ZEG дп TELL :n 
DOE :n RUN :п 
POP (PEN OP) PU 

PNR (PEN NEER) PD 

GUM PE 

GUM. PX 

KP :n (KIES PEN) SETPN :п 
KPK :n :n (KIES PEN KLEUR) SETPC пзп 
KBK :п (KIES BEELD KLEUR) SETBG :п 
KSK :n (KIES SCHILDPAD KLEUR) SETC mn 
ZETVAART mn SETSP :n 
LT (LEES TEKEN) RC 

LL (LEES LIJST) RL 
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NederLogo-opdrachten LCSI-opdracht 
PAKWEG | RANDOM 

DRUK PRINT 

TOON пшр TODE cnin Шоп 
MV :n (MAAK VORM) EDSH :n 

GV :n (GEEF VORM) GETSH :n 

KV :n (KRIJG VORM) SETSH :n 


74 Onderwijsprogramma's met Logo 


Mocht uit het voorafgaande de indruk gewekt zijn dat de kinderen 
de Logo-computer alleen te zien krijgen als een soort elektronisch 
tekenblok, dan is dit niet juist. Juist om ervoor te zorgen dat de 
Logo-computer blijft boeien is het zaak kinderen ook andere dingen 
aan te bieden. Hierbij moet worden opgemerkt, dat de kinderen waar 
ik destijds les aan gaf nog niet toe waren aan het schrijven van 
taal-, muziek- of sprokenprogramma's. Ik liet de kinderen dan ook 
werken met door mij gemaakte of bewerkte Logo-programma's (deze 
gebruiken de kinderen dus naast hun eigen programmeeractivitei- 
ten). Vaak vroegen de kinderen erom te mogen werken met deze 
programma's. 

Deze programma's werden door mij gebruikt: 
1. als introductie 
2. als spel 
3. ondersteunend en remediërend. 


1. Logo-programma's'als introductie 


De kinderen waar ik mee werkte hadden aanvankelijk nogal wat pro- 
blemen met het toetsenbord van de computer. Enkele van de voor- 
naamste problemen waren de repeterende toetsen en de letterherken- 
ning. Ook ‘veranderende dimensie! (ор het televisiescherm wordt 
naar voren: naar boven) en de 'Turtle Geometry' (richtingsbepaling 
vanuit de Turtle) waren zaken die aanvankelijk problemen gaven. 
Voor verschillende kinderen en op verschillende niveaus zijn toen 
programmaatjes geschreven. 
Hier waren onder andere programma's bij voor het: 
- tekenen met de Turtle zonder gebruik van het toetsenbord; 
- tekenen met enkele letters (V ,A ,L,R) of zelfs alleen met de cur- 
sortoetsen ; 
- verplaatsen van de Turtle naar een bepaalde plaats (gebruikma- 
kend van de Joystick). 
Op velerlei manieren en met vaak maar heel korte programmaatjes is 
Logo aan het kind aan te passen en hoeft het niet andersom. 


ЕГІ 


2. Logo-programma's als spel 


Het idee van de computer als spelletjesmachine is moeilijk te bestrij- 
den. Steeds weer vroegen de kinderen om een Logo-spel. En omdat 
het spreekwoord luidt: ТЕ you can't beat'em, јоіп'ет', heb ik toen 
- met de kinderen - verschillende spelen gemaakt. Voor veel onder- 
steunende en remediërende programma's is trouwens ook een spel- 
vorm gekozen. 


3. Ondersteunend en remediërend 


Het zal iedereen inmiddels duidelijk zijn dat Logo niet bedoeld is 
voor С.О.О. (Computer Ondersteund Onderwijs). Voor 'les-en- 
overhoor'-programma's (Drill and Practice) is Logo nooit bedoeld 
geweest. Toch kan het soms verhelderend en stimulerend werken 

om met kinderen samen een С.О.О.-ргоргаппа te schrijven. Want 
wat is er nu beter, wanneer een kind problemen heeft met bijvoor- 
beeld werkwoordsvervoegingen, dan het kind daar zelf een pro- 
gramma over te laten schrijven? Op deze manier is het kind op een 
speelse wijze bezig met een voor hem/haar essentieel (te remediëren) 
onderwerp. 

Het is overigens wel aan te bevelen om voor dit doel met zoge- 
naamde 'raamprogramma's' te werken. Een raamprogramma is dan 
een kant-en-klaar programma, dat op eenvoudige wijze kan worden 
aangepast. In een raamprogramma hoeft slechts de informatie (werk- 
woorden, sommen, enzovoort) te worden gewijzigd, zodat niet steeds 
een nieuw programma hoeft te worden geschreven. 

Het is daarbij verstandig de informatie in een lijst te zetten, 
waarvan ieder element zowel de opgave als het antwoord bevat. 

Een paar voorbeelden: 


MAKE "sommen [[[3+2=] 51 [[4+4=] 8] [[1+3=] 411 

MAKE "werkwoorden [[fietst fietste] [wandelt wandelde] 
[lacht lachte] } + | 

MAKE "reken [[[2.4=6] +] [[3.1=2] -] [[4.4=8] +] ] 


U ziet het, zowel de opgaven als de antwoorden staan in een lijst. 
In een raamprogramma moeten nu de volgende procedures voor- 
komen: 


- een procedure die de informatie bevat (sommen, werkwoorden, 
enzovoort), vastgelegd in een lijst; 

- een procedure die uit de hierboven genoemde lijst willekeurig één 
element haalt; 

- een procedure die de opgave afdrukt; 

- een procedure die het gegeven antwoord vergelijkt met het juiste 
antwoord ; 

- een procedure voor de goede antwoorden; 

- een procedure voor de foute antwoorden; 
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- een slotprocedure waar bijvoorbeeld het aantal goede/foute ant- 
woorden wordt vermeld. 


Als voorbeeld van zo'n raamprocedure ziet u hieronder SOMMEN- 
MAKEN. SOMMENMAKEN bestaat uit tien procedures: 


- SOMMENMAKEN : de hoofdprocedure; hier wordt de vraag 
gesteld hoeveel opgaven er gegeven moeten 
worden. Ook wordt het aantal goede en foute 
antwoorden op 0 gezet. 

- RIJTJE : de procedure die ervoor zorgt dat het оррере- 
ven aantal opgaven één voor één en onder 
elkaar wordt afgedrukt. 

SOMMEN : de procedure waar de opgaven en antwoorden 
in staan. Door MAKE "зот KIES :sommen wordt 
uit de lijst opgaven/antwoorden willekeurig één 
element gekozen. 

BEELD : de procedure die het eerste gedeelte van :som 
(de opgave) afdrukt en wacht op het in te typen 
antwoord. Daarna wordt het ingetypte antwoord 
vergeleken met het laatste gedeelte van :som 
(waar het antwoord staat). 

GOED : de procedure die in werking treedt als er een 
goed antwoord wordt gegeven. Het aantal goede 
antwoorden wordt dan met één opgehoogd. 

FOUT : de procedure die in werking treedt als er een 
fout antwoord wordt gegeven. Het aantal foute 
antwoorden wordt dan met één opgehoogd. 


- KIES : de procedure die ervoor zorgt dat op willekeu- 
rige wijze een opgave (en een antwoord) wordt 
gekozen. 

- ITEM : de procedure die voor KIES nodig is. 

- RN : de procedure die als het ware het antwoord 
'leest'. 

- SLOT : de procedure die het raamprogramma besluit. 


Hier wordt aangegeven hoeveel opgaven er zijn 
gemaakt en hoeveel goede of foute antwoorden 
er waren. Tevens stelt SLOT de vraag of het 
programma nogmaals moet draaien. 


Hier volgen de procedures: 


TO SOMMENMAKEN 

CT ERNS 

MAKE ”aantalgoede O 

MAKE ”aantalfoute O 

MAKE "Re 

ТҮРЕ [Hoeveel sommen wil je maken 72 
MAKE "aantal RN 

RIJTJE aantal 

END 


TO RIJTJE :N 

LF hm O CSLOT STOP) 
SOMMEN 

SETCURSOR LIST 14 P 
BEELD 

МЕКЕ "R rR + 4 

RIJTJE :N => 1 

END 


ТП SOMMEN 

MAKE ”ѕоттеп CCC3 + 4 =J 7ЛГЕ LL. en: ЭЛ 
ке» S 0) TEEN е 1 ag SICC2 + 2 =J Ч11 
MAKE ”som KIES :sommen 

END 


TO BEELD 

TYPE FIRST :som 

MAKE "antwoord RN 

IF EQUALP LAST :som ‘antwoord CGOEDJ CFOUTJ 
END 


TO GOED 

MAKE “aantalgoede :aantalgoede + 1 
END 

TO FOUT 

MAKE “aantalfoute :aantalfoute + 1 
END 

TO KIES гм 

OP ITEM С 1 + RANDOM COUNT :N 3 : N 
END 


TO ITEM :N :0 

ІРЛЕРІРТҮР : 0 СОР. a? 

IF :М е] COP FIRST ;0J 
ОР ITEM IN zs 1 BF +0 
END 


TO RN 
ОР-РТИВТ RL 
END 


TO SLOT 
РК С SE [Je hebt пиј ‘aantal ”sommen “gemaakt, 


PR С SE [Daarvan waren er :1 ‘aantalgoede "goed. 
PR С SE [Daarvan waren er :1 ‘aantalfoute "КО. 


FRE 

PR [Nog een keer J / М PJ 

MAKE ”keuze RC 

IF :keuze = ”J СЅОММЕММАКЕМЈ CCT STOP) 
END 
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Een ander programma dat ook grafisch aardig is om te bekijken is: 
KLOKKIJKEN. In dit programma wordt op het beeldscherm een cij- 
ferloze klok getekend, waarna de wijzers een (op RANDOM-wijze 
bepaalde) tijd aangeven. Onder op het scherm verschijnt dan: 


Hoe laat is het nu? (bij de hele uren) 
Het is nu half: (bij de halve uren) 


Wanneer dan de juiste tijd/het juiste uur wordt ingetypt, verschijnt 
er bijvoorbeeld: 


Jazeker 
Het is inderdaad . uur 


Na tien opgaven wordt het aantal goed en fout gemaakte opgaven 
vermeld. 

Dit programma kan eenvoudig worden gewijzigd in bijvoorbeeld 
klokkijken met kwartieren, of in digitaal klokkijken. Dan moeten 
er in de volgende procedures verschillende dingen veranderd wor- 
den: 


1. де opgaven іп KIESUUR (voor digitaal klokkijken zou een ele- 
ment er zo uit kunnen zien: [90 210 7.15], waarbij 90 de rich- 
ting van de grote wijzer, 210 de richting van de kleine wijzer 
en 7.15 de digitale tijd is); 

2. де tekst in КІЈКМА ; 

3. de teksten in PRIMA en FOUT; 

4. tenslotte ook de tekst van SLOT. 


Hier is het programma КІОККІЈКЕМ: 


TO KLOK 

MAKE 0-0 MAKE "EQ 

MAKE “GOED ГРгіта Keurig Jawel 
Inderdaad Jazeker Voortreffelijk) 
MAKE ”ЕООТ [Jammer Fout Onjuist 
Мев.... DjeeltJ 

TELL O HT FS UK GQ UK 63 UK Bb UK: 70 

JELE LI el Wide 

98 

ZETWIJZERS 10 

END 


TU TIK N ҮП 

ІР ЕПРТҮР Үр СОРТ 

IF aha EECORRIRSE : 039 
ОР ТТЕМ eh e ВЕТО 
END 


EEN 
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ЖӘЗКІКЗ TIJDEN 
ӘЕСІЧЕН C Tot RANDOM COUNT TIJDEN 9 "e TIJDEN 
END 


TO WIJZERS 

PU -SEIFUS ТОРОТ PN 

KEER Ж EFU ГЫ SC PD FD 3 PU BK S55 CT 303 
PU SE FPOS ГО et? 

END 


TO UK en 

PU SETPUS ГО СОР FD :n RI 90 PD 
REPEAT Ч CFD туп RT 90 FD :п] 
END 


ТО HUIS 

ЕЕЕ EE EA PE 
ЗЕТГОЭ CO COJ 
PD 

END 


TO KLEINEWIJZER 
TELL 4 NF SEIOS CO COI SEITH FIRST F 2 14 4 PD: FU ЕЭ 
END 


TO GROTEWIJZER 

ZELLE © PU HI SETPOS ГО 203 PD 
ЗЕТІН: FIERSI :TIJD 

r. 45 

END 


TO KIESUUR 

PAKE -TIJDEN ECO ЗО 13809 BO 23560-80 3920 20 Wi 
CO -ISP SILO 100 БИО 6:0 7100 ESO GILO E70 33 
CO 300 10260 330 11JCO 360-1246350 301326180 
БО 21L180 J0 3JC180 120 IER 250 502100 
180 6J(180 210 71 CIBO 240 811180 270 91 

L15090 20071046100: 230-:2771150 360 1223 

MAKE “TIJD KIES : TIJDEN 

END 


TO ZETWIJZERS :N 

IE oN w 70 8860ТГ SIOP] 

ERN ”TIJD 

KIESUUR 

GROTEWIJZER 

KLEINEWIJZER 

KIJKNA 

WAIT 50 CT HUIS 

BRAMIJSRNS PN = 1 

END bone 
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TO FOUT 

MAKE T: Eí + 1 

MAKE "NEE KIES: SEU 

PR :NEE 

ТЕ ‘EQUALP FIRST «TIJD "Q EPR VÚ SE CHet was 
LAST :TIJD "uurJEPR CSE CHet was тал 


LAST :TIJD 
END 
TO PRIMA 


ПИКЕ 70 t0 *- 1 

MAKE ”JA KIES :GOED 

PR :JA 

IF- EOUALP FIRST :TIJD "О EPR (С SE гнет із 
inderdaad) LAST T110 "uurJCPR C SE CHet is 
inderdaad half] LAST :TIJD 

END 


TO KIJKNA 

IF EQUALP FIRST :TIJD "180 CTYPE CHet is nu 
half :JJCPR CHoe laat is het nu 711 

MAKE ”G.A LAST :TIJD 

MAKE "А FIRST RL 

IF EQUALP :A :G.A CPRIMAJCFOUTJ 

END 


10 SLOT 

39 Ы 

REPEAT 10 CPR [JJ 

PR [Dat waren de hele en de halve uren.) 
PR E? 

PR С SE [Je had) :д "opdrachten “goed 

РР С SE [Je had] E "opdrachten "fout 
РЕТЕЗ 

РК (Код eene 77772 

PR (Type dan : КІОКЈ 


Voor deze en andere in Logo geschreven programma's is gebruik 
gemaakt van de vele mogelijkheden die Logo als taal bezit. Op deze 
manier zijn verschillende schoolse zaken aan de orde geweest: 


- tellen 

- het omgaan met hoeveelheden 

- lezen / taalbegrip 

- ruimtelijke begrippen 

- ruimtelijke oriëntatie 

- visuele / auditieve waarneming 

- klokkijken enzovoort, enzovoort. 
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Vanzelfsprekend komen vele van deze leer/vormingsgebieden ook 
аап de orde wanneer Logo als 'leeromgeving' wordt gehanteerd. Hier 
zal de nadruk dan ook op moeten blijven liggen. Maar omdat het zo 
eenvoudig is remediërende programma's te maken en omdat de kin- 
deren daardoor de Logo-computer ook eens van een andere kant 
zien, leek het goed u dit niet te onthouden. 


7.5 Logo in de klas 


De veranderingen die Seymour Papert in het onderwijs wil aanbren- 
gen zullen waarschijnlijk niet op korte termijn worden gerealiseerd. 
Maar we kunnen Logo natuurlijk ook binnen de huidige onderwijs- 
structuur hanteren. Daarbij moet Logo niet fungeren als doel, maar 
als middel, als didactisch hulpmiddel, dus Logo іп de klas als 'leer- 
omgeving'; Logo als '‘omgeving' waarin het kind gestructureerd en 
probleemoplossend leert denken. 

Ook in onze dagelijkse onderwijspraktijk is met Logo een omge- 
ving te scheppen waarin het kind op een speelse wijze bezig is | 
'zichzelf' te ontplooien. In een Logo-leeromgeving is een kind op 
geheel eigen wijze bezig met allerlei leer/vormingsgebieden die 
elders apart! op het lesrooster staan. In een Logo-leeromgeving is 
het kind bezig met visuele/auditieve perceptie (zintuiglijke waar- 
neming via ogen en oren), taal/spelling, ruimtelijke oriëntatie en 
begrippen, lateralisatie (links/rechts begrip), rekenen, omgaan met 
verhoudingen, enzovoort. 

Maar het allerbelangrijkste voor het kind is voor de leerkrach- 
ten vaak het moeilijkste: in de Logo-leeromgeving neemt het KIND 
het initiatief. Niet de computer zegt wat er moet gebeuren, niet de 
leerkracht, maar het KIND deelt hier de lakens uit. Op geheel eigen 
wijze ontdekt en onderzoekt het KIND de Logo-wereld. Wellicht is 
dit de reden waarom verschillende leerkrachten sceptisch tegenover 
Logo staan. Zou het dan zo moeilijk zijn te accepteren dat een kind 
ook zijn eigen leraar kan zijn? 

Een voorbeeldje. Een kind is met de Logo-Turtle aan het teke- 
nen en wil graag een cirkel maken. Het kind doet verwoede pogin- 
gen om de Turtle een cirkel te laten tekenen: 

REPEAT 10 [FD 10 RT 60] 

REPEAT 100 [FD 5 RT 30] 
maar het wil maar niet lukken. Hoe groot is dan de verleiding voor 
de leerkracht om 

REPEAT 36 [FD 10 RT 10] 
in te toetsen? Uiteindelijk, via vierkanten, vijfhoeken, zeshoeken, 
enzovoort, zal het kind er uit zichzelf wel achter komen. Dat leer- 
proces is, volgens de Logo-filosofie, veel belangrijker dan het 
resultaat: de cirkel. 

Als de leerkracht het kind vertelt hoe een cirkel getekend moet 
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worden, wordt dit proces уап al doende leren! doorbroken. Het is 
daarom ook zaak van Logo geen "уак" te maken waarvoor het kind 
een cijfer kan krijgen. Veeleer is Logo een vorm van wereldverken- 
ning waarbinnen het kind spelenderwijs met vele schoolse vaardig- 
heden bezig is. 

Logo kan voor een kind een individuele activiteit zijn. Maar dat 
hoeft niet! Gebleken is dat kinderen elkaar juist kunnen stimuleren 
en motiveren. 

Als materiaal bij het scheppen van een Logo-omgeving kunnen 
de oefenboekjes van het Logo Centrum Ede worden gehanteerd. Deze 
boekjes zijn door Willem Heyster samengesteld en bevatten zeer veel 
oefenmateriaal (het adres vindt u in appendix 5). Veel van dit mate- 
riaal is in dit boek als illustratie gebruikt. 

Natuurlijk moeten we reëel blijven. Een Logo-leeromgeving kan 
in lang niet iedere schoolsituatie optimaal worden gecreëerd. Zelfs 
in het gunstigste geval, waarbij in iedere groep ten minste één com- 
puter staat, is nog de tijd dat ieder kind de mogelijkheid heeft 
ermee te werken vaak veel te kort. 

Hierbij moet worden aangetekend dat het speciaal en voortgezet 
speciaal onderwijs een streepje voor hebben. Deze vormen van 
onderwijs hebben namelijk door hun groepsgrootte vaak meer diffe- 
rentiatiemogelijkheden dan de basisscholen. Maar in iedere situatie 
kan naar een compromis worden gezocht. 

In mijn situatie wordt er wekelijks een volle dag aan Logo 
besteed. De kinderen werken dan individueel of in groepjes om 
beurten. Zo komt ieder kind aan bod en kan op zijn eigen niveau 
bezig zijn. Erg snel blijken namelijk al grote verschillen tussen de 
diverse kinderen te bestaan. Maar dat geeft niet. Iedereen kan іп 
zijn eigen tempo en op geheel eigen wijze te werk gaan. Ieder kind 
heeft een eigen diskette waar de procedures, hulpprogramma's en 
eventueel spelen op staan waar het kind mee bezig is. De kinderen 
worden zo weinig mogelijk gestoord, maar weten dat ze te allen tijde 
een beroep op de leerkracht kunnen doen. Het gevaar van een der- 
gelijke manier van werken is, dat je het zicht kunt verliezen op 
waarmee de kinderen bezig zijn. Hoe lost een kind de problemen op 
die zich voordoen? Hoe beheerst een kind de verschillende program- 
meervaardigheden? Van tijd tot tijd is het bijzonder interessant om 
de kinderen te observeren wanneer zij aan het werk zijn. 

En omdat het kind de verschillende 'schoolse' vaardigheden hier 
in een ‘ongedwongen en eigen! situatie hanteert, maak ik zo nu en 
dan ook enige aantekeningen (achteraf) over het inzicht van het 
kind in verhoudingen, het omgaan met hoeveelheden, lateralisatie 
(links/rechts begrip), rekenkundige bewerkingen, enzovoort. Juist 
in een situatie als deze is het buitengewoon boeiend te zien hoe kin- 
deren de 'schoolse! vaardigheden hanteren. Hier ligt er immers geen 
dwang op, hier is het kind de situatie meester. 

Aanvankelijk maakte ik losse aantekeningen van ieder kind. 
Later echter besloot ik dit met behulp уап een soort Logo-Observa- 
tieformulier te doen. Geenszins om aan te geven hoe 'goed' ееп kind 
іп Logo is, maar om te noteren hoe een kind ‘schoolse! vaardigheden 
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іп de 'еіреп' situatie hanteert. Dit observatieformulier is slechts 
voor mijn eigen administratie. Ik wil het u echter niet onthouden. 
Het staat iedereen vrij een en ander aan te passen aan de eigen 
situatie. U vindt het op de volgende bladzijde. 


Toelichting op het Logo-Observatieformulier 


Dit formulier gaat uit van de computertaal Logo als leeromgeving 
voor het probleemoplossend denken (Р.О.р.). Nu is de vaardigheid 
van het P.O.D. moeilijk meetbaar en niet duidelijk te omschrijven. 
Daarvoor is de volgende oplossing gekozen. Het formulier toont 
diverse vaardigheden aan de hand waarvan een beeld van het 
P.O.D. kan worden gevormd. 

Het formulier gaat achtereenvolgens іп op de volgende onder- 
delen: 


- perceptie 

- ruimtelijk inzicht 
rekenen 
hantering Logo 


Elk van deze aspecten is weer uitgesplitst in diverse vaardigheden. 
Het formulier beoogt geenszins een volledig beeld te geven van 
de beheerste vaardigheden, daar is het veel te beperkt voor. De 
bedoeling is een globale indruk te geven van de beheerste vaardig- 
heden binnen de leer- en programmeeromgeving van Logo. 
Binnen het '‘probleemoplossend'! denken zijn de volgende fasen 
te onderscheiden: 


1. Waarneming/formulering van het probleem. Wat moet ег gebeu- 
ren? Bijvoorbeeld: welke grafische voorstelling moet worden 
gemaakt ? 

2. Welke weg moet bewandeld worden om dit probleem op te lossen? 
Opsplitsing van het probleem in kleinere eenheden. 

3. Welke opdrachten zijn noodzakelijk voor dit probleem? Nu en in 

- een later stadium. 

4, Welke subprocedures zijn noodzakelijk om dit probleem op te 
lossen? 

5. Aanpak van het probleem: 

- gebruik van de juiste opdrachten 

- gebruik subprocedures 

- gebruik variabelen, recursie, enzovoort 
- schrijven van de procedures. 

6. Het testen, foutvrij maken ('debuggen') en laten werken van 
de procedures. | 


Noodzakelijk voor deze manier van werken zijn de in het formulier 
genoemde en geteste vaardigheden, hoewel het een geen voorwaarde 
voor het ander hoeft te zijn. Met andere woorden: er kan reeds, met 


` > Onderdeel : > Datum 


Perceptie 


* waarneming globaal 


Ruimtelijk inzicht 


* globaal 


Gebruik Logo : 
* hantering Joystick 


* werkhouding 
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vallen en opstaan, geprogrammeerd worden zonder kennis of pro- 
grammeervaardigheden. Trial and Error heet dit in onderwijstermen, 
ofwel de benadering: al doende leren. Bij het toenemen van de ken- 
nis en de programmeervaardigheden zal ook de mate van P.O.D. 
toenemen. De basis is, zoals het in de Logo-wereld heet: leren zon- 
der uitdrukkelijke instructie. 

Door het programmeren (hoe eenvoudig ook) van een machine, 
de Logo-computer, leren kinderen probleemoplossend denken. En 
dat is voor de makers van Logo ooit eens de reden geweest om deze 
taal te ontwikkelen. 


Soms kan het zinvol zijn te zien hoe een kind een bepaald Logo- 
probleem aanpakt. Het gaat dan duidelijk niet om het te maken pro- 
dukt (een tekening), maar om de wijze waarop het kind het probleem 
benadert. Welke stappen onderneemt het kind om tot de oplossing 
van dat specifieke probleem te komen: 


- Observeert het kind de te maken figuur goed? 

- Weet het kind de opdrachten die het op dat moment kent juist te 
hanteren? 

- Is het kind in staat op een juiste wijze verhoudingen/hoeken enzo- 
voort te interpreteren? 

- Hanteert het kind het probleem op een logische wijze? 

- Hoe reageert het kind op fouten die het bij het programmeren 
maakt ? 


- Hoe is de interactie van het kind met zijn/haar Logo-computer? 


Deze vragen kunnen met observatie vaak niet worden beantwoord. 

Toch vond ik het aardig eens te kijken op welke manier ieder 
kind in zijn/haar Logo-omgeving bezig was. Bij wijze van proef heb 
ik de kinderen toen een zelfde opdracht gegeven. Elk van deze kin- 
deren, dat wist ik, zou geen enkel probleem hebben met het maken 
van de gevraagde figuren. Het ging er daarom ook niet om of de 
kinderen de figuren konden maken, maar hoe de kinderen te werk 
zouden gaan. Ook hierbij ben ik uitgegaan van het materiaal van 
het Logo Centrum Ede. Ter illustratie vindt u hier een voorbeeld 
van zo'n opdracht. 


Opdracht: maak de volgende vier figuren 


Opmerking. Bij het maken van deze figuren komen de diverse pro- 
grammeervaardigheden overduidelijk aan de orde: het waarnemen 
van de figuur; gebruik van de juiste opdrachten; ruimtelijk inzicht; 
omgaan met hoeveelheden; cijfersymbolen; relaties; verhoudingen; 
manier van probleemoplossen, enzovoort. Bij al deze figuren wordt 
voornamelijk gekeken: hoe lost het kind het probleem op en welke 
programmeervaardigheden ontbreken nog? 
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Е иа 


Бал дел 


H 


7.6 Afsluiting 


Het zal iedereen duidelijk zijn dat Logo, hoewel het geen kinder- 
taaltje is, toch uitstekend aanslaat bij kinderen. Logo als program- 
meertaal, Logo als leeromgeving, thuis en op school. In Amerika is 
lange tijd sprake geweest van een ware Logo-manie. Logo is daar 
dan ook uitgeroepen tot de Educatieve Software van het jaar. En 
ook u zult, bij het doorlezen van dit boek, tot de ontdekking zijn 
gekomen dat de drempel om met Logo te beginnen wel erg laag is. 
Zo laag zelfs, dat zelfs heel jonge kinderen al met Logo bleken te 
kunnen werken. 

Het mooiste hierbij is natuurlijk de Vloerschildpad (Floor Turtle), 
een robot-achtig apparaat dat, net als de beeldschermschildpad, 
reageert op de via het toetsenbord gegeven opdrachten. Helaas is 
de vloerschildpad nogal kostbaar en heeft lang niet iedere Logo- 
versie de mogelijkheden om ermee te werken. 

Wel moet worden vastgesteld dat Logo, ook in het huidige 
onderwijssysteem, een volwassen plaats zou kunnen innemen. Het is 


189 


dan ook verheugend te zien dat steeds meer scholen ае Logo-moge- 
lijkheden van hun computer gaan inzien. Belangrijk іп deze ontwik- 
keling is, dat er steeds meer Nederlandstalige Logo-versies ver- 
schijnen. De Nederlandse Logo's voor MSX en Commodore zijn hier 
een duidelijk voorbeeld van. 

Een probleem echter is nog de achtergrondinformatie. De hand- 
leiding die bij het Logo-pakket geleverd wordt is vaak onvoldoende. 
Een gunstige uitzondering hierop vormen opnieuw de twee reeds 
eerder genoemde Nederlandstalige Logo's. 

Het is duidelijk dat de belangstelling voor Logo toeneemt. Hier- 
door zal ook de hoeveelheid literatuur over Logo toenemen. En dat 
is een goede zaak. 

Hopelijk heeft u uit het voorafgaande een beeld kunnen krijgen 
van de mogelijkheden van Logo met kinderen, de mogelijkheden van 
Logo ook als leer- en programmeeromgeving op scholen. Indien 
mogelijk willen de verschillende Logo Centra u graag helpen als u 
vragen hebt. De adressen vindt u in appendix 5. 


Hoofdstuk 8 
LOGO … EEN TAAL; VELE DIALECTEN 


192 


8.1 Bespreking van de meestgebruikte Logo's 


Het is jammer maar waar..., ook een taal als Logo is niet universeel. 
Op vele computers is te werken met Logo, maar er zijn steeds kleine 
verschillen. Eén taal met vele dialecten, het is hetzelfde probleem 
als met BASIC. In dit hoofdstuk zullen de bekendste Logo-versies 
besproken worden. 

Tevens vindt u een zeer handige vergelijkingstabel, waar de 
meest gebruikte Logo-opdrachten in te vinden zijn voor de volgende 
machines: Apple, Atari 800/130, Atari 1040/520/260 ST, Acorn en 
ВВС, Commodore, Sinclair Spectrum en de MSX-computers. 

Op het moment zijn drie Nederlandstalige Logo-versies op de 
markt: een oude TI Logo, de Nederlandse Commodore-Logo en de 
Nederlandse MSX-Logo. Maar u kunt, zoals u heeft gezien, vrij een- 
voudig uw eigen Nederlandstalige Logo maken. 

Laten we eerst maar eens naar enkele Logo-versies gaan kijken. 


Apple Logo Voor de Apple-computers zijn er verschillende 
Logo-versies te verkrijgen. Zo zijn er de Terrapin 
Logo en de Krell Logo. Voor Apple is een Logo 
geschreven door het softwarebedrijf Logo Computer 
Systems Incorporated (LCSI), hetzelfde bedrijf 
dat ook de Logo's voor de Atari 800/130 en de 
Spectrum heeft ontwikkeld. Bovendien is er voor 
de Macintosh wel een heel speciale Logo versche- 
nen: de ExperLogo. 

Experlogo is een fantastische, maar vrij prijzige 
Logo-versie die behalve ongekende grafische moge- 
lijkheden ook nog over een zeer uitgebreide lijst- 
bewerking beschikt. Wat het grafische deel betreft: 
ExperLogo is bijzonder snel in het tekenen, van- 
daar dat de Turtle vervangen is door de Bunny 
(het konijn). Hoewel in ExperLogo de kleuren ont- 
breken, is het een hele belevenis ermee te kunnen 
werken. 

In de tabel wordt echter uitgegaan van de LCSI 
Logo, omdat deze bij Apple de meest gebruikte is. 


Atari Logo Voor Atari zijn er twee Logo-versies beschikbaar: 
een voor de 8-bits modellen (600/800/130): de 
LCSI Logo, en een vóor de 16-bits machines (260/ 
520/520+/1040): een Atari Logo, ontwikkeld in 
nauwe samenwerking met Digital Research (DR. 
Logo). In dit boek is al genoeg gezegd over de 
Atari LCSI Logo (daarmee heeft de auteur van dit 
boek lange tijd en naar volle tevredenheid 
gewerkt). 
De DR.Logo wordt, een pluspunt voor Atari, stan- 


BBC Logo 


Commodore Logo 
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daard bij de machine geleverd (op diskette). Het 
is een fantastische belevenis om met deze Logo te 
werken: deze Logo is namelijk volledig met GEM*) 
(dus met ‘vensters! met de muis) te besturen van- 
uit diverse menu's. Zo kunnen we direct na het 
starten al kiezen uit een Desk File Run Edit en 
Settings menu. Om een voorbeeld te noemen: wan- 
neer we met de muis het Edit-menu kiezen, kunnen 
we, eveneens zonder het toetsenbord aan te raken, 
de volgende opdrachten kiezen: Workspace, File, 
Save Edit, Abandon, Mark, Cut, Copy, Paste, 
Top, Bottom, Center, Page Ор, Page Down, 

>Line en «Line. Zo is de DR.Logo een zeer bijzon- 
dere Logo. Wel moet nog worden opgemerkt dat in 
deze Logo de muziek- en sprookmogelijkheden ont- 
breken, maar daar staat een zeer uitgebreide lijst- 
bewerking tegenover. 

In de tabel worden zowel de LCSI als deze DR. 
Logo besproken. 


De meest gebruikte Logo voor de BBC-computer 
wordt geleverd op ROM en moet in de machine wor- 
den ingebouwd. Deze Logo beschikt tevens over 
een losse cassette/diskette met de zogenaamde 
Extensions! compleet met vele voorbeeldprogram- 
ma's. Voor de BBC Logo is tevens veel randappa- 
ratuur te verkrijgen (veelal in Engeland) zoals: 
vloerschildpadden, buggies, robots en een zoge- 
naamd ‘concept Кеуроага!. Het was een genoegen 
er langere tijd mee te kunnen werken. 

In de vergelijkingstabel vindt u de opdrachten 
van BBC's eigen Logo-versie (door Acornsoft ont- 
wikkeld). | 
Voor de BBC is ook de professionele taal LISP te 
verkrijgen. 


Voor de Commodore-computers zijn momenteel drie 
Logo-versies te verkrijgen. U heeft de keuze uit 
Engelstalige en Nederlandse Logo's. De Engelse 
Commodore Logo is een heel mooie met zeer veel 
mogelijkheden (vooral op het gebied van sproken 
en muziek). Deze 'Terrapin һоро! is, wat we zou- 
den kunnen noemen, een verbeterde versie van de 
Apple Terrapin Logo. 


ж) GEM betekent: Graphics Environment Manager en is een grafisch georiënteerd 
programma dat tussen de gebruiker en de systeemopdrachten van de computer in 
staat. Met behulp van grafische symbolen op het scherm worden de diverse 
systeemopdrachten aangeduid. Deze pictogrammen (voor inhoudsopgave van disk, 
formatteren, bestanden kopiëren, enzovoort) worden op het beeldscherm met een 
pijltje aangewezen. Op deze manier zijn systeemopdrachten zeer snel aan de com- 
puter door te geven. 
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LCN Logo 


MSX Logo 


Zoals gezegd is dit een erg uitgebreide Logo-ver- 
sie. Evenals bij de BBC het geval is, wordt ook 
deze Logo geleverd met een zogenaamde 'Utility 
Півк!. Ор deze Utility Disk staan onder andere 
demonstratieprogramma's, hulpbestanden (als de 
Sprite Editor) en een zeer uitgebreid Logo-muziek- 


programma. 


Omdat voor Commodore momenteel een Nederlandse 
Logo beschikbaar is, wordt deze 'Terrapin Logo 

іп de winkels voor een 'родетргіјѕ! verkocht. 
Nieuw voor Commodore is de Nederlandse Logo 
(uitgever: Malmberg). Opvallend bij deze prach- 
tige Logo is het uitgebreide en duidelijke handboek 
van maar liefst zo'n 270 pagina's. Hier zouden vele 
andere Logo-uitgevers een voorbeeld aan kunnen 
nemen. 

Ook voor de Commodore Logo is een vloerschildpad 
te verkrijgen. Deze 'Valiant Turtle! is via de com- 
puter infrarood te besturen en kost als pakket 
(Turtle, interface, trafo en programmatuur) опре- 
veer 1600 gulden. Een en ander is te bestellen bij 
Malmberg/Fysica. Omdat de Valiant Turtle nogal 
prijzig is, heeft Malmberg ook een exemplaar (Lotje 
genaamd) dat aan scholen en dergelijke verhuurd 
wordt. 

In de vergelijkingstabel vindt u onder Commodore 
een opsomming van de belangrijkste Commodore 
Terrapin Logo-primitieven. 


Het Logo Centrum Nijmegen heeft een zeer origine- 
le en hoogwaardige Logo ontwikkeld met LISP- 
achtige trekjes. De drempel voor deze Logo ligt, 
door de wat ingewikkelder extra's, iets hoger dan 
voor andere Logo-versies, maar het moet gezegd 
worden: het is een unieke, Nederlandstalige, Logo. 
Voor informatie hierover kunt u terecht bij het 
Logo Centrum Nijmegen (zie appendix 5). Deze 
Logo is niet opgenomen in de vergelijkingstabel. 


Deze LCSI Logo-versie is volledig Nederlandstalig, 
door Philips in modulevorm (ROM-cartridge) ор de 
markt gebracht (begin 1985) en bij alle MSX (1 en 
2) computers te gebruiken. 

Met enige vertaling is alles wat in dit boek behan- 
deld is direct in MSX Logo te gebruiken. De verge- 
lijkingstabel kan hierbij voor u van grote waarde 
zijn. 

De teken-, sproken- en woordenwereld zijn zeer 
volledig, de muziekwereld echter komt er tamelijk 
bekaaid af. 
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De Philips handleiding behandelt geen woord-lijst- 
bewerkingen. Daarom heeft het Logo Centrum Ede 
er een Doe-het-zelf practicum voor gemaakt. Deze 
wordt, bij aankoop van de module in Ede, gratis 
bijgeleverd. 


Spectrum Logo Dit is de enige Logo-versie die op band wordt 
geleverd. Ondanks het feit dat u zeker vijf minu- 
ten moet wachten voor u aan de slag kunt, is de 
Spectrum Logo alleszins de moeite van het bekijken 
waard. Opvallend zijn de zeer mooie graphics (met 
een zeer hoge resolutie) en enkele handige print- 
opdrachten als: PRINTON en COPYSCREEN. Ook 
zijn de opdrachten STARTROBOT en STOPROBOT 
beschikbaar voor het besturen van de vloerschild- 
pad. 

Spectrum Logo beschikt echter niet over een spro- 
kenwereld en ook de muziekmogelijkheden zijn niet 
bepaald opzienbarend. Wat muziek betreft is stan- 
daard slechts de opdracht SOUND beschikbaar, 
waarmee (eenstemmig) de toonhoogte en de toon- 
duur kunnen worden bepaald. 

Ook deze Logo is een LCSI-produkt en de opdrach- 
ten zijn terug te vinden in de vergelijkingstabel. 


We hebben de verschillende Logo-versies bijna allemaal gehad. 
Enkele zijn niet genoemd: 


- De IBM Logo's (DR.Logo en LCSI Logo) 
- DEC Logo (LCSI Logo) 

- Kaypro en CP/M Logo-versies 

- Schneider/Armstrad Logo. 


Als u de vergelijkingstabel bekijkt, zult u ontdekken dat de ver- 
schillen meestal maar heel erg klein zijn. Het verschil zit soms in 
slechts een enkele letter: MEMBERP, MEMBERQ en MEMBER?. Met 
behulp van de vergelijkingstabel is het mogelijk om vrijwel alle pro- 
cedures uit dit boek om te zetten naar uw eigen Logo-versie. 


8.2 Vergelijkingstabel 


In de vergelijkingstabel zijn lang niet alle grafische opdrachten 
voor de genoemde Logo-versies opgenomen. De meeste versies һер- 
ben veel meer grafische opdrachten en sprokenopdrachten. Zo heeft 
bijvoorbeeld de DR. Logo van Atari nog onder andere de volgende 
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opdrachten: BOX, CIRCLE, ELLIPSE, FILL, SETZOOM. 

Een moeilijkheid is soms ook dat opdrachten met min of meer 
dezelfde naam bij verschillende Logo-versies een andere werking 
hebben. Dit is bijvoorbeeld het geval met SHAPE (Atari/Commodore) 
en SH(BBC). 

Waar opdrachten ongelijke werking hebben of niet aanwezig zijn 
staat een streepje: - . 

Ook de opdrachten die we bij het manipuleren met woorden en 
lijsten gebruiken zijn lang niet allemaal opgenomen. Iedere Logo- 
versie voegt hier zijn eigen specifieke opdrachten aan toe. Het is 
aardig om eens naar de DR.Logo van Atari (16 bits) te kijken. 
Deze Logo-versie beschikt over zeer sterke opdrachten voor de 
lijstbewerking. Om eens enkele te noemen: 

SHUFFLE is een DR.Logo-opdracht die alle elementen van de gege- 
ven lijst op RANDOM-wijze, dus willekeurig, rangschikt; 

WHERE is een opdracht die de plaats van een element in een lijst 
aangeeft. 

Maar zoals u weet, met enige kennis van zaken is bijna iedere 
opdracht voor iedere Logo-versie zelf te schrijven. 


Wellicht heeft u zich afgevraagd waarom er geen sproken- en muziek- 
opdrachten in de vergelijkingstabel zijn genoemd. Deze beide horen 
toch ook bij Logo? 

Dat is waar, maar we moeten constateren dat deze mogelijkheden 
lang niet in iedere Logo-versie te vinden zijn. Spectrum Logo bij- 
voorbeeld kent geen sprokenwereld. 

Logo-versies 'met' muziek en sproken (Atari 8 bits, Apple, ВВС, 
Commodore en MSX) zijn in werking en opzet zo verschillend dat 
het vrijwel onmogelijk is deze te vergelijken. Om maar eens iets te 
noemen: de Commodore Logo heeft geweldige muziekmogelijkheden 
in tegenstelling tot bijvoorbeeld de Atari 8-bits en MSX Logo. DR. 
Logo van Atari 16-bits heeft helemaal geen muziekmogelijkheden. 
Wat sproken betreft hebben zowel Commodore als MSX prima moge- 
lijkheden, maar deze liggen in werking en opzet zover uit elkaar, 
dat ze niet te vergelijken zijn. 

Zo heeft iedere Logo zijn bijzonderheden. Geen enkele Logo is 
slecht te noemen. Iedereen kan experimenteren met de mogelijkhe- 
den van zijn eigen Logo. Al werkende met Logo maakt u uw eigen 
opdrachten en schrijft u zo uw eigen taal op maat'. Dat is het bij- 
zondere van een taal als Logo. Maar dat had u natuurlijk al begre- 
pen. 


APPENDICES 
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А.1 Lijst van de meestgebruikte Logo-primitieven 


AND 


ASCII 


ASK 


BACK / BK 


BG 


BUTFIRST / BF 


BUTLAST / BL 


. CALL 


CATALOG 


CHAR ` 


CLEAN 


- PR AND "TRUE "TRUE 
Geeft TRUE als waarde als beide invoergegevens 
TRUE zijn 


- PR ASCII "С 
Geeft de ASCII-code voor het genoemde teken 


— ASK 1 [FD 40] 

Laat de genoemde Turtle(s) de gegeven opdrachten 
uitvoeren. Beinvloedt niet de met TELL aangeroe- 
pen Turtles 


- BK 100 
Laat de laatst aangeroepen Turtle(s) het gegeven 
aantal stappen achteruit gaan 


- PR BQ | 
Geeft het nummer van de huidige achtergrondkleur 


- РЕЗВР EEA 8] 
Geeft als resultaat de elementen van de gegeven 
lijst op het eerste na 


- PR BL Uk 2-3] 
Geeft als resultaat de elementen van de gegeven 
lijst op het laatste na 


— „CALL 1536 
Roept een machinetaalroutine aan beginnende op 
het gegeven adres 


- CATALOG "D: 
Geeft de inhoudsopgave van de diskette. 


- PR CHAR 66 


Geeft het teken dat bij de genoemde ASCII-code 
hoort 


- CLEAN 

Geeft een schoon grafisch scherm, maar beïnvloedt 
niet de snelheid, richting en positie van de 
Turtle(s) 


COLOR 


COND 


COS 


COUNT 


CS 


CT 


.БЕРОБІТ 


ЕАСН 


EDIT 


EDNS 


EDSH 


EMPTYP 


END 
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- PR COLOR 
Geeft als resultaat de kleur van de laatst aange- 
roepen Turtle 


- IF COND 3 [PR [Hallo] ] 
Geeft TRUE als waarde als aan de conditie voldaan 
wordt. Zie hiervoor de Collision Tabel 


+ (PR COS 90 
Geeft als resultaat de cosinus van het genoemde 
aantal graden 


= PR COUNT [ ade wl] 
Geeft als resultaat het aantal elementen in de 
gegeven lijst of woord 


28 
Maakt het grafische scherm schoon. Zet de 
Turtle(s) in 'thuis'positie, dat is 0, 0 richting 0 


ss CT 
Maakt het tekstscherm schoon 


- .ПЕРОБІТ 53256 3 
Geeft het eerstgenoemde geheugenadres de laatst- 
genoemde waarde | 


- ЕАСН [SETH 901 
Laat iedere Turtle afzonderlijk de genoemde ор- 
drachten uitvoeren 


- EDIT "PROCEDURE 
Start de Logo Editor met de genoemde procedure 


- EDNS 
Start de Logo Editor met alle in het werkgeheugen 
aanwezige variabelen 


- EDSH 1 
Start de Shape Editor met het genoemde 'vorm'- 
nummer 


+ IF ЕМРТҮР :V [PR [Leeg "III 
Kijkt of de/het genoemde lijst/woord wellicht 'leeg! 
is. Geeft dan als waarde TRUE 


- END 
Besluit een procedure 
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EQUALP 


ERALL 


ERASE 


ERF 


ERN 


ERNS 


ERPS 


.ЕХАМІМЕ 


FIRST 


FORWARD / FD 


FPUT 


FS 


- IF EQUALP ab [PR [Gelijk !!!! 11 

Kijkt of beide invoergegevens (dit kan een lijst/ 
woord/getal zijn) wellicht 'gelijk' zijn. Geeft dan 
als waarde TRUE 


- ЕКА 
Maakt het gehele werkgeheugen leeg 


- ERASE "PROCEDURE 
Haalt de genoemde procedure(s) uit het werkge- 
heugen en wiet! ze. Meerdere procedures moeten 
in een lijst geplaatst worden. Bijvoorbeeld 
ERASE [een twee drie vier] 


- ERF "D:LOGOFILE.EXT 
Erase File; deze opdracht 'wist' het genoemde 
bestand van de diskette 


- ERN "antw 
'Wist' de genoemde variabele(n). Moeten er meerdere 
variabelen worden gewist, plaats ze dan in een lijst 


- ERNS 
'Wist' alle variabelen uit het werkgeheugen 


- ERPS | 
'Wist! alle procedures uit het werkgeheugen 


- PR .EXAMINE 53257 
Geeft als resultaat de waarde van het genoemde 
geheugenadres 


- PR FIRST [abe] | 
Geeft als resultaat het eerste element van de gege- 
ven invoer. Dit kan een woord zijn, een getal of 
een lijst 


- FD 100 
Laat de laatst aangeroepen Turtle(s) het gegeven 
aantal stappen vooruitgaan 


- PR FPUT "een [twee] 
Geeft als resultaat een lijst waarbij het genoemde 
element voorin de genoemde lijst wordt geplaatst 


> FO 
Maakt het gehele scherm (Full Screen) geschikt 
voor grafische weergave 


GETSH 
HEADING 
HOME 

HT 


IF 


INT 

JOY 

JOYB 
KEYP 
LAST 
LEFT / LT 


LIST 
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- MAKE "vorm GETSH 1 
Geeft als resultaat een lijst van zestien getallen; 
dit zijn de gegevens van de genoemde vorm 


- PR HEADING 
Geeft als resultaat de richting уап de laatst aange- 
roepen Turtle 


- HOME 
Plaatst de aangeroepen Turtle(s) in uitgangsposi- 
tie (0 0) in de richting 0 


-HS 
Maakt de aangeroepen Turtle(s) onzichtbaar (Hide 
Turtle) 


- IF :z < 20 [VIERKANT] [STOP] 

Laat, indien aan de genoemde voorwaarde wordt 
voldaan, de opdracht(en) uit de eerste lijst uit- 
voeren. Wordt aan de genoemde voorwaarde niet 
voldaan, dan wordt/worden de opdracht(en) uit 
de tweede lijst uitgevoerd | 


= PR INI 53,2785. 
Geeft als resultaat de integere waarde van het 
genoemde getal 


- MAKE "R JOY 0 
Geeft als resultaat de positie van de genoemde 
joystick 


- IF JOYB 0 [PR [Ingedrukt !!]] 
Geeft als waarde TRUE indien de rode knop van 
genoemde joystick wordt ingedrukt 


- IF KEYP [PR [Een toets ingedrukt !!!]] 
Geeft als waarde TRUE indien een toets van het 
toetsenbord wordt ingedrukt 


- PR LAST "huis 
Geeft als resultaat het laatste element van de 
genoemde lijst of het genoemde woord 


- L 90 
Draait de aangeroepen Turtle(s) het gegeven aan- 
tal graden linksom 


- PR LIST "een "twee 

Geeft als resultaat een lijst, bestaande uit de ge- 
noemde invoergegevens. Deze invoergegevens 
mogen zelf ook lijsten zijn 
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LISTP 


LOAD 


LPUT 


MAKE 


MEMBERP 


NAMEP 


NODES 


NOT 


NUMBERP 


OR 


OUTPUT / OP 


- IF LISTP :L [РЕ [Dit is een lijst ] | 
Geeft als waarde TRUE als het genoemde invoerge- 
gegeven een lijst is 


- LOAD "С: 
Laadt een bestand van cassette ("С:) of diskette 
("0:). Bij het laden van diskette moet een 
bestandsnaam worden genoemd 


- PR LPUT "twee [een] 
Geeft als resultaat een lijst waarbij het genoemde 
element achter in de genoemde lijst wordt geplaatst 


í МАКЕ оК 
Maakt ееп variabele en geeft deze de genoemde 
waarde 


- PR MEMBERP "a [b c d a] 
Geeft als waarde TRUE indien de genoemde invoer 
deel uitmaakt van de genoemde lijst 


- PR NAMEP :а 

Geeft als waarde TRUE indien genoemde variabele 
een waarde heeft. Dat wil zeggen als genoemde 
variabele bestaat! 


- PR NODES 
Geeft als resultaat de nog beschikbare geheugen- 
ruimte 


- PR NOT NUMBERP "HALLO 
Geeft als waarde TRUE indien aan de voorwaarde 
NIET wordt voldaan. Geeft als waarde dus FALSE 
als aan de voorwaarde wel wordt voldaan. Het 
voorbeeld geeft dus TRUE, want een woord is 
GEEN getal 


- PR NUMBERP 777 
Geeft als waarde TRUE indien genoemde invoer 
een getal is 


- PR OR "TRUE "FALSE 
Geeft als waarde TRUE indien aan een van beide 
voorwaarden wordt voldaan 


- OP SUM 776 883 

Kan alleen ni een procedure worden gebruikt en 
onthoudt! als het ware het gevolg van de gegeven 
opdracht 


РС 


РЕ 


РЕМ 


PENDOWN / PD 


PENUP / PU 


PN 


PO 


POALL 


POD 


PODS 


PONS 


POPS 


-“РЕ-РСА 
Geeft als resultaat de kleur уап de genoemde реп 


e PE 
Maakt van de pen уап de aangeroepen Turtle(s) 
een vlakgum 


- PR PEN 
Geeft als resultaat de toestand van de pen van de 


aangeroepen Turtle(s). Dit kan zijn PD, PU, PE 
of PX 


SEA 
Laat de tekenpen уап de aangeroepen Turtle(s) 
zakken 


+ PU 
Haalt de tekenpen van de aangeroepen Turtle(s) 
omhoog 


"ҒИСЕМ | 
Geeft als resultaat het nummer уап de gebruikte 
pen bij de laatst aangeroepen Turtle(s) 


- PO "PROCEDURE 
Beeldt op het beeldscherm de definitie van de 
genoemde procedure af. Wanneer meerdere proce- 
dures worden gevraagd [ ] gebruiken 


- POALL 
Beeldt op het beeldscherm zowel de procedures 
als de variabelen af 


— POD 0 

Geeft de When-Demon aan bij genoemde Collision. 
Met andere woorden: "май gebeurt er indien, in 
dit geval, Collision 0 plaatsvindt ?' 


- PODS | 
Geeft alle actieve When-Demons aan 


- PONS 
Beeldt op het beeldscherm alle variabelen af plus 
de waarde die zij hebben 


- POPS 
Beeldt op het beeldscherm alle procedures af plus 
hun definities 
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РО5 


РОТ5 


.PRIMITIVES 


PRINT / PR 


PRODUCT 


PUTSH 


PX 


RANDOM 


RC 


RECYCLE 


REMAINDER 


REPEAT 


RERANDOM 


- PR POS 
Geeft als resultaat de coördinaten van de laatst 
aangeroepen Turtle(s) 


- РОТ5 
Beeldt op het beeldscherm alle namen van de in het 
werkgeheugen staande procedures af (alleen hun 
namen dus!) 


- „PRIMITIVES 
Beeldt op het beeldscherm alle Logo-primitieven af 


- PR [ Hallo Allemaal | 
Beeldt op het beeldscherm de gegeven invoer af. 
De PRINT-opdracht kan ook gevolgd worden door " 


- PR PRODUCT 5-6 
Geeft als resultaat het produkt van beide getallen 


7 PUTSH 1 huis 
Geeft aan de genoemde vorm de in een variabele 
vastgelegde gegevens 


ер 
Maakt van de pen уап de laatst aangeroepen 
Turtle(s) zowel een tekenpen (op de lege vlakken) 
als een uitwispen (op reeds getekende vlakken) 


- PR RANDOM 10 
Geeft aan de genoemde vorm de (in een variabele 
vastgelegde) gegevens 


- MAKE "keus RC 
Geeft als resultaat het laatst ingedrukte teken 


- RECYCLE 
Maakt het werkgeheugen schoon door alle type- 
fouten enzovoort te wissen 


- PR REMAINDER 10 3 
Geeft als resultaat het 'restgetal' па het eerste 
getal door het tweede te hebben gedeeld 


- REPEAT 7 [FD 8 RT 45] 


Herhaalt de gegeven opdracht het genoemde aantal 
malen 


- RERANDOM REPEAT 2 [PR RANDOM 5] 
Onthoudt! de RANDOM-getallen en hun volgorde. 
Later kunnen deze dan opnieuw worden gebruikt 


RIGHT / RT 


RL 


ROUND 


RUN 


SAVE 


SE 


SETBG 


SETC 


SETCURSOR 


SETENV 


SETH 


SETPC 
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~ RT.990 
Draait de aangeroepen Turtle(s) het aangegeven 
aantal graden rechtsom 


- MAKE "naam RL 
Geeft als resultaat (en plaatst in een lijst) het 
woord, de woorden of de zin die volgt 


- PR ROUND 5.0045 
Geeft als resultaat het naar het dichtstbijzijnde 
gehele getal afgeronde invoergetal 


= RUN [VIERKANT] 

Voert in een procedure de gegeven opdrachten of 
de gegeven procedure uit alsof het in de 'Direct 
Mode' werd ingevoerd 


“SAME TP: 

Schrijft de inhoud van het werkgeheugen weg пааг 
e A cassette 

"Pi -~ printer 

"D:FILENAAM diskette 

Zowel procedures als variabelen worden wegge- 
schreven 


- PR SE "hallo "daar 
Geeft als resultaat een zin, die de gegeven invoer 
bevat 


- SETBG 77 
Geeft de achtergrond een kleur als aangegeven 


- SETC 16 
Geeft de laatst aangeroepen Turtle(s) de aangege- 
ven kleur 


- SETCURSOR [10 2] 
Zet de cursor op de aangegeven plaats 


- SETENV 0 126 

Zet de Envelope Shaper voor het genoemde 
(eerste invoergegeven) geluidskanaal op de 
waarde van het tweede invoergegeven 


- SETH 270 
Draait de aangeroepen Turtle(s) in de aangegeven 
richting 


~ БЕТРС 0 120 
Verandert de genoemde tekenpen (0, 1 of 2) іп de 
aangegeven kleur 
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SETPN 


SETPOS 


SETREAD 


SETREAD || 


.SETSCR 


SETSH 


SETSP 


SETWRITE 


SETWRITE [] 


SET X 


SETY 


- SETPN 1 
Geeft de laatst aangeroepen Turtle(s) de genoemde 
pen 


- SETPOS [0 40] 
Plaatst de laatst aangeroepen Turtle(s) op de 
genoemde coördinaten 


- SETREAD "D:FILENAAM 

Geeft als resultaat het genoemde bestand uit het 
genoemde randapparaat. Het bestand kan pas gele- 
zen worden met de opdracht RC of RL 


- SETREAD |1 
Sluit het met SETREAD "D:FILENAAM geopende 
bestand ` 


- „SETSCR 1 
Bepaalt de resolutie van het beeldscherm 


- SETSH 2 
Geeft de laatst aangeroepen Turtle(s) de genoemde 
vorm 


- SETSP 150 

Geeft de laatst aangeroepen Turtle(s) de genoemde 
snelheid. 
Opmerking. De invoer mag ook negatief zijn. 
Hierdoor beweegt/bewegen de Turtle(s) zich ach- 
teruit 


- SETWRITE "Р 

Opent een bestand naar het genoemde randappa- 
raat en stuurt daarheen alle op het beeldscherm 
verschijnende informatie. Met SETWRITE "P: en 
CATALOG "D: wordt dus de inhoudsopgave van 
de diskette afgedrukt 


- SETWRITE || 
Sluit het met SETWRITE "D:FILENAAM (of 
SETWRITE "P:) geopende bestand 


- SETX 40 
Zet de laatst aangeroepen Turtle(s) op de gegeven 
X-coördinaat 


- SETY -100 
Zet de laatst aangeroepen Turtle(s) op de gegeven 
Y-coördinaat 


SHAPE 


SHOW 


SHOWNP 


SIN 


SPEED 


SQRT 


55 


5Т 


5ТОР 


SUM 


TELL 


THING 


TOOT 
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- PR SHAPE 
Geeft als resultaat het "Әһаре! (vorm-)nummer 
van de laatst aangeroepen Turtle(s) 


- SHOW [A C E] 

Beeldt de gegeven invoer op het beeldscherm af. 
Indien de invoer een lijst is, wordt deze met haak- 
jes afgedrukt 


- IF SHOWNP [HT] 
Geeft als waarde TRUE indien de laatst aangeroe- 
реп Turtle(s) zichtbaar is/zijn 


- PR SIN 90 
Geeft als resultaat de sinus van de gegeven hoek 


- PR SPEED 
Geeft als resultaat de snelheid van de laatst aan- 
geroepen Turtle(s) 


- PR SQRT 16 
Geeft als resultaat de (vierkants)wortel van het 
genoemde getal 


- 58 
Geeft een gedeeld beeldscherm (tekst еп graphics) 


- 5 
Maakt de aangeroepen Turtle(s) zichtbaar 


- IF :zijde > 20 [STOP] 
Stopt de procedure en kan dus alleen IN een pro- 
cedure worden gebruikt 


- PR SUM 999 111 
Geeft als resultaat de som van beide genoemde 
getallen 


- TELL [012 3] ST 
Roept genoemde Turtle(s) op de erna volgende 
opdrachten uit te voeren 


- PR THING :v 
Geeft als resultaat de waarde van de genoemde 
variabele 


- ТООТ 0 261 10 30 

Opent het geluidskanaal (eerste getal), produceert 
daar een toon van de genoemde frequentie (tweede 
getal) op het genoemde volumeniveau (derde getal) 
gedurende de genoemde tijd (vierde getal) 
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Т5 


ТҮРЕ 


WAIT 


WHEN 


WHO 


WINDOW 


WORD 


WORDP 


WRAP 


XCOR 


YCOR 


EB 
Maakt het gehele beeldscherm beschikbaar voor 
tekst 


- ТҮРЕ "а ТҮРК тр 
Drukt de gegeven invoer op het beeldscherm af 
maar springt daarna niet naar een nieuwe regel. 
De cursor blijft dus aan het einde van de afge- 
drukte regel staan 


- WAIT 60 
Geeft een pauze van het genoemde aantal tijdseen- 
heden. De gebruikte eenheid is hier 1/60 seconde 


- WHEN 3 [HT] 
Maakt genoemde When-Demon actief en laat hem de 
in de lijst genoemde opdrachten uitvoeren 

- WHEN 3 [ ] 
Maakt de genoemde When-Demon inactief 


- PR WHO 
Geeft als resultaat de actieve/laatst aangeroepen 
Turtle(s) 


- WINDOW 
Maakt van het grafische scherm een 'WINDOW'! 
(venster). Laat dus maar een klein gedeelte zien 
van het Turtle 'tekenterrein! 


- PR WORD "aard "bij 
Geeft als resultaat een woord bestaande uit de 
genoemde invoergegevens 


- PR WORDP "woord 
Geeft als waarde TRUE indien de invoer een woord 
is 


- WRAP 
Maakt het Turtle 'tekenterrein' zo groot als het 
beeldscherm. Laat de Turtle, indien deze van het 
scherm verdwijnt, ег aan de andere kant weer 
op komen 


- PR. .XCOR 
Geeft als resultaat de X-coördinaat van de laatst 
aangeroepen Turtle(s) 


— PR YCOR 
Geeft als resultaat de Y-coördinaat van de laatst 
aangeroepen Turtle(s) 
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A.2 De Logo-foutmeldingen 


Opmerking. Ook onder de foutmeldingen vertonen de diverse Logo- 
versies minieme verschillen. Kijk dit goed na voor uw eigen Logo. 


- OUT OF SPACE 


De beschikbare geheugenruimte is vol. Geef de opdracht 
RECYCLE (of de vergelijkbare opdracht voor uw Logo-versie) of 
haal enkele procedures of variabelen uit het geheugen. 

- I DON'T KNOW HOW ТО... 


Een niet-gedefinieerde procedure is aangeroepen. 


- ... HAS NO VALUE 
U heeft een variabele gebruikt die geen waarde heeft. Geef deze 
variabele een waarde met bijvoorbeeld de opdracht MAKE. 

- NOT ENOUGH INPUTS TO 
U heeft een procedure aangeroepen of een opdracht gebruikt zon- 
der de hiervoor benodigde invoergegevens. 

- YOU DON'T SAY WHAT TO DO WITH ... 
Een Logo-object (woord, lijst of getal) is gebruikt zonder een 
opdracht. 

- TO MUCH INSIDE () 'S 
In een Logo-opdracht zijn teveel haakjes gebruikt. Zoek een ande- 
re oplossing voor deze opdracht. Maak er bijvoorbeeld twee 
opdrachten van. 

ze MEN ЧУР KO, 
U bent de invoer vergeten in de ene procedure (of opdracht) en 
daardoor werkt ook de tweede procedure (of opdracht) niet. 

– ....15 А PRIMITIVE 


U hebt een ongeoorloofde procedurenaam gekozen. Deze is name- 
lijk een Logo-opdracht en kan dus niet als procedurenaam worden 
gebruikt. 


- ... DOESN'T LIKE ... AS INPUT 


U hebt voor een opdracht een ongeoorloofde invoer gebruikt. Bij- 
voorbeeld PR SUM HUIS 990. 
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- UNEXPECTED ')! 


U hebt een sluithaakje ) gebruikt zonder dat ег ееп openings- 
haakje ( was. 


- NUMBER TOO BIG 


U laat een rekenkundige bewerking uitvoeren waarvan het resul- 
taat groter is dan 1Е98 = 107% of kleiner is dan 1Е-98 = 10 2%, 


-_... IS ALREADY DEFINED 


U heeft al een procedure geschreven met de zojuist opgegeven 
naam. Kies dus een andere naam of haal de andere procedure uit 
het geheugen. 


- ... IS NOT TRUE OR FALSE 


U heeft bij AND, OR, IF of NOT een invoergegeven gebruikt dat 
onmogelijk TRUE of FALSE kan zijn. 


= ГСАМ OREN `... 


U heeft de opdracht LOAD, SAVE, SETREAD of SETWRITE onjuist 

gebruikt. De oorzaak van deze foutmelding kan bijvoorbeeld zijn: 

- u heeft Logo gestart op een DOS-besturingssysteem met enkele 
dichtheid en probeert nu een bestand te lezen van een schijf 
met dubbele dichtheid; 

- u wilt een bestand laden zonder aan te geven waarvan. Bijvoor- 
beeld LOAD "PROGRAM. 

In de meeste gevallen geeft Logo precies aan waar de fout zit. 


- FILE ... NOT FOUND 


U wilt een bestand laden (met LOAD of SETREAD) dat niet te 
vinden is. 


- YOU'RE АТ TOPLEVEL 


U heeft de opdracht STOP of OUTPUT gebruikt іп de Direct Mode. 
Buiten een procedure om kunnen deze opdrachten niet worden 
gebruikt. 


- STOPPED 1 


U heeft de BREAK-toets gebruikt. Hiermee onderbrak u ае lopen- 
de procedure of de gebruikte opdracht. 


Opmerking. Een nieuwe taal, zoals Logo, leren is een zaak van val- 
len en opstaan, van fouten maken en fouten herstellen. In het 
Engels is daar een mooi woord voor: DEBUGGEN - de BUGS, de 
fouten eruit halen. Logo zou niet een van de meest gebruikersvrien- 
delijke talen zijn als ook dit niet soepel ging. 
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Het systeem van foutmeldingen bij Logo is ideaal. Het zijn geen 
foutmeldingen met cijfers maar met duidelijke zinnen die u vertellen 
wat er aan de hand is. Toegegeven, het is even wennen, maar na 
een tijdje werkt het vlot. 

Logo geeft tijdens het uitvoeren van een procedure of een opdracht 
precies aan wat u fout gedaan heeft (doet). 

Omdat Logo - in tegenstelling tot bijvoorbeeld BASIC - niet tijdens 
het programmeren, maar tijdens het draaien de fouten aangeeft, is 
het essentieel om bij het schrijven van een groot programma een en 
ander op te splitsen in (vele) subprocedures. 

In deze subprocedures kunt u dan afzonderlijk de fouten gaan op- 
zoeken. En ze herstellen natuurlijk! 
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A.3 Logo en machinetaal 


Heel bewust is in dit boek weinig geschreven over het direct wer- 
Кеп met geheugenadressen' іп Logo. Dit is namelijk nogal merkge- 
bonden. Dat wil zeggen dat de geheugenadressen per computermerk 
verschillend zijn. Toch is het goed in deze appendix even kort in 
te gaan op de machinetaal voor Atari LCSI Logo. Ook als u over een 
andere Logo-versie beschikt (en de genoemde geheugenadressen 
dus niet kunt gebruiken) kunt u zich wellicht een beeld vormen van 
wat er ook in machinetaal bij Logo mogelijk is. 

Atari LCSI Logo beschikt over een PEEK- en een POKE-opdracht, 
respectievelijk .EXAMINE en .DEPOSIT geheten. Met .EXAMINE 
kuken! we іп een geheugenadres om er een waarde af te lezen. Met 
.DEPOSIT "тейеп" we een waarde in een geheugenadres. Daarom 
vraagt .EXAMINE één invoergegeven (de geheugenplaats) en 
.DEPOSIT twee (de geheugenplaats еп de ‘aldaar te plaatsen! waar- 
de). 

Atari-gebruikers moeten hierbij goed om де. voor de opdracht . 
denken. De stip is ervoor om aan te geven dat het gebruik van 
deze opdrachten niet zonder gevaar is. Door een bepaalde waarde 
in een geheugenadres te stoppen, kan de computer vastlopen en 
kan het programma verloren gaan. 

De 8-bits processor, het hart van de Atari-computer, kan 65536 
geheugenplaatsen aansturen. Elk van deze geheugenplaatsen kan 
acht bits ‘informatie! in zich opnemen. Voor ieder bit zijn er maar 
twee mogelijkheden: ‘aan! of 'uit'. Als een bit "аап! is, spreken we 
van spanning en schrijven een 1. Is het bit 'uit! dan is er geen 
spanning en schrijven we een 0. Deze acht bits (genummerd 0-7) 
heten samen een byte. 

Wanneer we nu de waarde van ieder bit weten (dus of het aan/uit 
is) en we noteren hiervoor een 1 of een 0, dan krijgen we een 
binair getal van acht cijfers, bijvoorbeeld 10001111. Iedere byte nu 
kan een waarde hebben van 0 t/m 255 (decimaal) ofwel 00 t/m FF 
(hexadecimaal). En dat is logisch: zijn alle bits "аап!, dan is de 
_‘bit-waarde! 11111111 (en dat is het decimale getal 255); zijn alle 
bits 'uit', dan is de 'bit-waarde! 00000000 (en dat is het decimale 
getal 0). | | 

Het is niet zinvol hier alle 65536 geheugenplaatsen op te noemen, 
maar hier volgen enkele belangrijke Atari-geheugenplaatsen: 


18, 19 en 20 de interne klok van de Atari. Straks krijgt u een 
kort voorbeeldprogramma over deze geheugenplaatsen 


11 Atari-gebruikers weten dat, wanneer zij hun toetsen- 
bord enige tijd niet hebben aangeraakt, hun beeld- 
scherm steeds van kleur verandert. Iedere keer dat 
u het toetsenbord gebruikt wordt namelijk op deze 


82, 83 


959 


(04 
(05 
106 
107 


131 


755 


767 
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plaats ееп 0 gezet. Wordt het toetsenbord niet 
gebruikt, dan wordt de waarde iedere vier seconden 
met 1 opgehoogd. Bereikt de inhoud van adres 77 nu 
de waarde 128, dan gaat de computer over in de 
zogenaamde 'Atract'.mode en verandert de kleur van 
het beeldscherm dus steeds. Om dit nu bij (recursie- 
ve) programma's met een joystick te voorkomen, moet 
het programma minimaal één keer per acht minuten 
de waarde 0 in adres 77 stoppen. Het is dus niet vol- 
doende (vooraf) eenmaal .DEPOSIT 77 0 te geven. 
Beter is het deze opdracht 'recursief' in te bouwen. 


Kolomwaarden voor respectievelijk de linker- en de 
rechterrand van het beeldscherm. Gewoonlijk vinden 
we hier de waarden 2 en 39. 


.DEPOSIT 559 0 schakelt de beeldschermprocessor 
uit. U kunt dit zien door het 'zwart' worden van het 
beeld. Het beeldschermgeheugen wordt echter niet 
leeggemaakt. De opdracht kan nuttig zijn bijvoor- 
beeld bij het maken van lange berekeningen. 
Vergeet niet om naderhand in dit adres weer de 
‘oude! waarde terug te zetten. 


Kleurregister voor Turtle 0. 
Kleurwaarde voor Turtle 1. 
Kleurwaarde voor Turtle 2. 
Kleurwaarde voor Turtle 3. 


Bepaalt het geluid bij het indrukken van een toets. 
ledere waarde ongelijk aan nul verwijdert de 
'keyboard-click'. Bijvoorbeeld .DEPOSIT 731 1. 


Dit is het register voor de weergave van de tekens. 
Bij 0 worden alle inverse tekens als normaal behan- 
deld. Daardoor wordt de cursor 'onzichtbaar'. 

Bij 1 worden alle inverse tekens als spaties weerge- 
geven. 

2 is de standaardwaarde van dit adres. 

Bij 3 worden alle inverse tekens als inverse spaties 
weergegeven. 


Start- en stopaanduiding voor de beeldschermweerga- 
ve. De normale waarde van dit adres is 0. Door het 
indrukken van de toetsen CTRL en 1 komt hier de 
waarde 255 te staan. We noemen dit een invertering 
(omkering) (van 00000000 tot 11111111). 
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53256 


53257 
53258 
53259 


53770 


Bepaalt de 'breedte! van Turtle 0. 

De standaardwaarde is 0 of 2. Zetten we hier de 
waarde 1 of 3, dan maken we de Turtle 'breder'. 
Idem voor Turtle 1. 

Idem voor Turtle 2. 

Idem voor Turtle 3. 


Uit dit geheugenadres kunnen toevalswaarden (tussen 
0 en 255) worden gelezen. Dit heeft dus hetzelfde 
resultaat als een RANDOM-opdracht. 


Zoals gezegd, dit zijn slechts enkele van de 65536 geheugenadres- 

sen. Voor degenen onder u die zieh willen verdiepen in deze mate- 

rie is er voldoende literatuur. Voor de Atari kan genoemd worden: 

- Mapping the Atari, door Ian Chadwick, uitgegeven door Compute 
Books, ISBN 0 87455 004 1. 

- Atari Peeks en Pokes, Koch, uitgegeven door Data Becker/Bruna. 


Tot slot volgt hier nog het programma: de Logo-klok. De klok, 
gebaseerd op de geheugenplaatsen 18, 19 en 20, is een bekend 
Atari-programma. Logo-klok maakt van het beeldscherm een digita- 
le klok met dagen, uren, minuten en seconden. Het programma 
heeft reeds in vele boeken en tijdschriften gestaan maar nog nooit 
in een Logo-uitvoering. 

Het programma "ІКІОК! maakt slechts gebruik van één hoofd- en 
twee subprocedures. Het is ook een aardig programma om mee te 
experimenteren. 

U vindt de listing op de volgende bladzijde. 
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TO lklok 


TO klok 

DEPOSIT 752 1 TS 

МАКЕ "Е INT С .ЕХАПІМЕ 18 2 * 6559536 + С 
„EXAMINE 19 ) * 256 + С .ЕХАМІМЕ 20 2 

НИКЕ PT INI С. :Е / 59-2 

MAKE "D INT С :T / 86400 2 

MAKE ”НН INT С :Т / 3600 2 

MAKE "НИН = :D * 24 

МАКЕ “MIINE < ;T' Z 60 2 

MAKE "М :MM = D e 1440 — H * БО 

MAKE "5 :T ~ D * ВБЧ00- :H * 3500 < :M 
ж БО 

SETCURSOR [7 2) PRC* * L o g O k lok 

ж *] 

SETCURSOR [S HJ PR (С SE :0 "dag H “uur 
ІМ "in. 9 "sec. 

klok 

END 


TO pull Пп 

IF ip =- 543 ГӘТОРЈ 
"DEPOSIT C 18B + :n-) O 
DUL #4 

END 
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A4 ASClII-codetabel 


[e] HH [I] s) Fz E] mj [H [m] [=]. АЛАЙЫН г =, ТЕГ 


Usel [е [ [1 =] L! $] It] i=) PI m PI 


[N EJ Ë] [Ф| [e] [гч] [e] [el [=] [e] [s] E] [e] EEH sJ É] Ed 


[s] [о] [z] [z] [г] [=] [=] =] Iz] [©] [т] [m] [о] [o] |в) [>] @ [э IN] [u] 


[e] [о] [е] [=] [e] UE [a R N [<] P+] [z] [s<] [©] [s] [e] z] [©] 


101 


102 


103 


104 


105 


106 


107 


108 


109 


110 


111 


112 


113 


114 


115 


116 


117 


118 


119 


120 


P] [s] [<] [s] E=] [e] [-] [е] [е] [°] [>] [B] =] [=]  [<{ [>] Fe] E [e] 


121 


122 


123 


124 


125 


126 


127 


128 


129 


130 


131 


132 


133 


134 


135 


136 


137 


138 


139 


140 


141 


142 


143 


144 


145 


0+5" f E 1i "i -Ari Bhi- Eni- -E LEE ERR 


u G 
147 
148 а 
149 -= 
150 (В 
151 т 
152 Ы 
153 (В 
aa D 
155 EOL 
156 
157 
158 


— 
сл 
NO 


ORE Шу 


— 
о 
° 


кеі 
о 
— 


162 


163 


164 


° 
EN 


165 


166 


167 


168 


169 


170 


171 


172 


173 


174 


175 


176 


177 


178 


179 


180 


181 


182 


183 


ОЙСЕ>БОН-Б/ИНІБН.Ы-Ы BPP RB BB BB BB RR RRE 


196 


197 


198 


199 


205 


HS ШЕ BR BR RR D RR E F EE E R F т E E ш HU E 


221 


222 


223 


224 


225 


226 


227 


228 


229 


230 


231 


232 


233 


234 


235 


236 


237 


238 


239 


нинписивнвһШЦЫыИЦЦИыИЦЦМИВЕВБИИВВЕВЦПЦНВИН 


246 


m 
248 D 
у, 
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A.5 Namen, adressen en tips 


Wanneer u met vragen zit over het gebruik van Logo kunt u contact 
opnemen met: 


Logo Centrum Nijmegen 
Postbus 1408 

6501 BK Nijmegen 

Tel. 080 - 238130 


of Logo Centrum Ede 
Annalaan 96 
6715 JC Ede 
Tel. 08380 - 21306 


De stuwende kracht achter het Logo Centrum Ede is Willem Heyster. 
Reeds eerder zijn de Logo-werkboekjes genoemd, die u hier kunt 
bestellen. Nieuw is het boek Logologie, lekker puzzelen met de 
computer. Dit boek is geschreven door Willem Heyster en uitgegeven 
door het Logo Centrum Ede. Logo is bij uitstek geschikt om het 
analytisch denken te bevorderen. Daarom daagt dit boek u uit aller- 
lei constructies om te zetten in Logo-procedures. 

Een aantal van die problemen trof u in dit boek reeds aan als 
illustratie. 


Een stichting die Logo-kampen organiseert is: 


Stichting Logo K 
Postbus 1407 
8011 PE Zwolle 


Scholen die met vragen zitten kunnen natuurlijk ook contact opne- 
men met de verschillende schoolbegeleidingsdiensten of met de 
diverse regionale steunpunten onderwijs en informatietechnologie 
(WS EK-Eaä 

Ook kunnen scholen contact opnemen met де: 


Stichting Kinderen met Computers 
Kuyperstraat 7 
5694 CW Son en Breugel 


„Voor het speciaal en voortgezet speciaal onderwijs is er de: 
Werkgroep Computers Speciaal Onderwijs. Het adres is: 


Secretariaat W.C.S.O. 

p/a Burg. van Hellenbergstraat 1 
1217 LJ Hilversum 

Tel. 035 - 15050 
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Aangesloten bij het М.С.5.О. werken een dertiental regionale groe- 
pen, COMBO's genaamd. Informatie hierover is te verkrijgen bij het 
W.C.S.O. 


Overal ter wereld zijn mensen bezig met Logo. Om te horen wat al 
die mensen doen en om een poging te doen ze met elkaar in contact 
te brengen is er in de Verenigde Staten een Logo Penpal Club. 
Het gaat om het uitwisselen van gedachten, ideeën en programma's 
onder Logo-gebruikers (vooral uit het onderwijs) over de gehele 
wereld. Het adres is: 


Logo Penpal Club 

University of Virginia 
Ruffner Hall 

405 Emmet Street 
Charlottesville, VA 22905-2495 
USA 


EPILOOG 


EPILOOG 


Dit boek is geschreven vanuit de behoefte u, als lezer, iets meer 
over de prachtige programmeertaal Logo te vertellen. U heeft kun- 
nen lezen dat Logo veel meer is dan het spelen met de Turtle. Aan 
de hand van zeer vele voorbeelden heeft u zich een beeld kunnen 
vormen van Logo. 

Ik hoop dat u enthousiast bent geworden over het werken met 
Logo. De programma's die ik als illustratie gebruikte waren geen 
kant-en-klare programma's. Het is аап u om met deze programma's 
uw eigen programmeerervaringen op te doen. Elk van de gebruikte 
programma's kunt u naar hartelust veranderen en aanpassen aan uw 
eigen wensen. Ik heb slechts geprobeerd u de bouwstenen aan te 
reiken waarmee u zelf aan de slag kunt. 

Daarom heb ik ook nooit de pretentie gehad 'volledig' te zijn. 
Vele zaken zijn onvermeld gebleven. Graag had ik bijvoorbeeld iets 
meer willen vertellen over de geweldige muziekmogelijkheden van 
Commodore Logo, of had ІК wat dieper willen ingaan op het werken 
met lijsten in DR.Logo van de Atari 520/260. Enfin, een eerste aan- 
zet is er in ieder geval. 

Het schrijven dan dit boek was nooit mogelijk geweest zonder 
de hulp van enkele mensen. Ik wil ze hier even met name noemen. 
Bedankt Willem Heyster, voor het nakijken en corrigeren van het 
manuscript en voor het mogen gebruiken van de illustraties uit je 
werkboekjes; André de Regt, voor het maken van de prachtige 
illustraties voor het boek; Toon van Dijk, voor je deskundige hulp 
en advies betreffende Logo-machinetaalopdrachten, Joep Steeman en 
Peter Koster voor jullie correctiewerk, en Tetty voor alle geduld! 

Bedankt ook iedereen die mij heeft gestimuleerd, gemotiveerd 
en geadviseerd. 


Auke Sikma 
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INDEX 


Enige opmerkingen. 


- In het boek zult u niet alle Logo-primitieven beschreven vinden. 
In de Woordenlijst (pp. 202 e.v.) echter vindt u een opsomming 
van de meeste Logo-opdrachten en functies. 


- De index heeft, per letter, de volgende indeling: 
- in HOOFDLETTERS de besproken Logo-primitieven en de 
voorbeeldprocedures; procedures zijn aangegeven met een *; 
- begrippen en trefwoorden die іп de tekst voorkomen. 


SDRIEHOEK *, 20 
6рКІЕНОЕК *, 21 
DRIEHOEK *, 21 


ABS *, 100 
ACHTERUIT *, 50 

ALL %, 165 

ALLSH %, 164 

AND, 57 

ANIMATIE.1 %, 144 
ASCII-ecodelijst, 220-221 
Achttallig stelsel, 101 
Adventures, 84 
Amplitude, 113 
Animatie, 142 

Apple Logo, 192 
Artificial Intelligence, 3 
Assimilatie, 6 

Atari Logo 16-bits, 192 
Attack, 115 


BACK (BK), 16 
BASE *, 104 

BASE2 *, 103 

BBC Logo, 192 
BEWEEG %, 140 
ВЕМЕЕС2%, 141 
BLOK *, 38 
BLOKKENDOOS *, 23 
BOOM rec. *, 29 


BUTFIRST (BF), 48 
BUTLAST (BL), 48 
Binaire stelsel, 102 
Bit-patroon, 158 


D s Ph e PFD yy a 
CATALOG, 77 
CHECK *, 96 
CIRKEL %, 20 
COMPARE %, 95 
COPYSH *, 165 
COS, 99 

COUNT, 52 

Clear Screen (CS), 17 
Clear Text (CT), 17 
Collision, 146 
Collision-tabel, 147 
Commodore Logo, 192 


DEEL *, 100 
DEPOSIT, 139 
DOWNSH *, 164 
DR.Logo, 192 
DRIEHOEK *, 20 
Decay, 115 

Decibel, 112 
Decimale stelsel, 101 
Drill and Practice, 177 


EACH, 40 
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EDIT, 18 

EDSH, 137, 163 
EMPTYP, 50 

EQUALP, 55 

ERAF1 *, 49 

ERAF2 *, 49 

ERASE NAME (ERN), 32 
ERSH %, 164 


EXAMINE, 71 
Elementen in lijsten, 46 
Envelope, 114 


Envelope Shaper, 124 e.v. 


ExperLogo, 192 
Expertsysteem, 5 


FIGUUR rec. *, 27 
FIRST, 48 

FORWARD (FD), 16 
ЕРОТ; 54 

Floor Turtle, 
Foutmeldingen, 213 e.v. 
Frequentie, 114 
Frequentiewaarden, 120 


GETGEGEVENS *, 161 
СЕТӘН,.:; 139, 163 
GROEIVIERKANT *, 34 
Geluid, 112 e.v. 
Global, 149 


HAIKU.GENERATOR %, 59 
HEADING, 37 

HIDE TURTLE (HT), 16 
HOME, 16 

Hexadecimaal getal, 105 


INT, 100 

ITEM * %2 

Infix, 98 

Inkleuren vlakken, 37 
Interactief Logo, 7 


KEYP, 28 

KIES * 31; 53 
KLEURENKAART *, 36 
KLEURIN %, 38 
KLOKKIJKEN %, 180 
KORTJAKJE *, 121 

KP a 

KUBUS *, 37 

Kinderen en Logo, 172 
Kleurschema Atari 8-bits, 
Kunstmatige Intelligentie, 
LAST, 48 

LCN Logo, 192 

LEFT (LT), 17 

LIED *; 131 

LIJN *, 149 

LISP (de taal), 2 

LIST „54 

LISTP, 55 

LOAD, 42 


LOGOMEMO %, 74 
LOOPTURTLE *, 150 
LPUT, 53 

Leeromgeving, 5-6 

Lijsten in lijsten, 52 

Local, 149 

Logo Centrum Ede, 222 
Logo Centrum Nijmegen, 222 
Logo Editor, 18 
Logo-Manager, 78 

Logo Observatieformulier, 186 
Logo Penpal Club, 223 
Logo Tekst, 87 e.v. 
Logo en Onderwijs, 183 


MAKE, 23 
MAKESH *, 161 
MEMBERP, 55 
MOVESH *, 165 
MSX Logo, 192 
Machinetaal en Logo, 216 e.v. 
Meerdere Turtles, 39 e.v. 
Meerkleurige sprook, 162 
Meerstemmige muziek, 122 
Mierowerelden, 6 


NAMEP, 55 

NODES, 83 

NOT, 58 

NUMBERP, 55 

Nederlandse Logo's, 193, 194 
NederLogo, 175 


OR, 58 


PEN DOWN (PD), 34 
PEN ERASE (PE), 34 
PEN ERASE (PX), 34 
PEN UP (PU), 34 
PLUSJA *, 51 
POLYGOON *, 42 

POS, 38 

PRINT (PR), 47 
PRODUCT, 47 

PASH T 165 
PSYCHIATER *, 69 
PUTGEGEVENS *, 161 
РЫТӘН, 139; 163 
Рарегі, Seymour, 2, 5-6 
Piaget, Jean, 5-6 

Player Missile Graphics, 136 
Praktijkervaring, 173 
Prefix, 98 


Probleemoplossend denken, 183 


Procedureel Logo, 8 
Procedures maken, 18 e.v. 
Prolog (de taal), 5 


RANDOM, 31 
RC, 63 
RECORD *, 86 
REM %, 164 


REMAINDER, 100 
REPEAT, 17 
REPLACE *, 95 
REPLAY *, 86 
RIGHT (RT), 17 
RL, 63 

ROUND, 100 

RW, 86 
Raamprogramma, 177 
Recursie, 24 e.v. 
Recursief Logo, 10 
Release, 115 


SAVE, 42 
SCHILDERIJ *, 31 
SENTENCE (SE), 53 
SETBG, 36 


SETPN, 36 
SETREAD, 74 


SETSP, 140 
SETWRITE, 74 

SETX, 37 

SETY, 37 

SHOW TURTLE (ST), 16 
SIN, 99 
SOMMENMAKEN *, 178 
SQRT, 99 

SRECORD *, 86 
STARTTURTLE *, 149 
ӨТЕН %; 20 

STER :stap %, 22 
SUM, 98 

SUPER SHUTTLE %, 154 
SUPERSTER %, 22 
SYSRESET *, 164 
Shape Editor, 137 
Spectrum Logo, 192 
Sproken, 136 

Sproken ontwerpblad, 170 
Sprokenbibliotheek, 141 


Stichting Kinderen met Computers, 
Stichting Logo Kampen, 222 


Sustain, 115 


TAN *, 99 
TEGENSTELLING *, 66 
TEKENING *, 31 

TELL, 39, 40 
TOGETHER *, 94 
TOOT, 117 

TURTLE MUSIC, 131 
TURTLEDANS *, 151 
ТҮРЕ, 50 

Taalwereld Logo, 45 e.v. 
Tekenverzameling, 138 
Terrapin Logo, 192, 193 
Testopdrachten maken, 54 
Transient, 114 

Turtle Geometry, 12 
Tweetallig stelsel, 102 


UPSH *, 164 
USE *, 41 
Uitbreidbaar Logo, 9 


VELD * 150 
VIERKANT *, 19 
VIERKANT :stap *, 22 
VIERKANT rec. *, 25 
Valiant Turtle, 194 
Variabelen, 21 


Vergelijkingstabel, 196 e.v. 


Vloerschildpad, 


W.C.S.O. (Combo's), 223 
WAAR? *, 57 


WORDP, 55 
Werkboekjes Ede, 184 
When-Demons, 146 e.v. 
Woorden en lijsten, 46 
Workspace, 20 


XCOR, 37 
YCOR, 37 


ZOMAARWAT *, 32 
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